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CARTUCHO 
DE AMPLIACION 
0 GRABACION 

El problema que tengo es 
que compré un cartucho de 
expansión de memoria de 
64ÍÍ HBI-55 de 64K para 
poder grabar juegos que ne- 
cesitan más memoria que la 
del ordenador. Pues bien, 
cada vez que lo intento me 
sale el programa mezclado o 
con errores. ¿Cómo solucio- 
nar este problema? 

Koldo Píquer Bauszko 
San Sebastián 

Por la referencia que nos das, 
el cartucho que tienes no es 
de ampliación, sino de alma- 
cenaje con capacidad de 4K. 
Es decir que no te sirve para 
ampliar la memoria sino pa- 
ra almacenar información de 
la Agenda incorporada al 
Sony. 

Si quieres ampliar la memo- 
ria de tu ordenador tienes 
que buscar un cartucho espe- 
cífico. La misma casa Sony 
tiene el HBM-16 y el 
HBM-64. 



MEMORIA 



Tengo un ordenador HB101 
P de SONY, y en el manual 
de instrucciones pone que 
tiene 32K de ROM y 32K de 
RAM. Lo que me gustaría 
saber es si en esas J2K de 
RAM están incluidas las que 
se utilizan para los dibujos o 
sólo son para las operaciones 
y utilidades. 

Ignacio Molina Robledo 
Santander 

La memoria de tu ordenador 
se reparte de la siguiente 
manera: 

29 K para usuario 
3K sistema operativo 
16K VRAM 

Es decir, en las 32K de RAM 
a las que te refieres, no están 
incluidas las que se utilizan 
para los dibujos. Para ellos 
existe la VRAM, que como 
hemos dicho tiene 16K. 




QUINIELAS 

Tengo problemas con las lí- 
neas 140, 160, 170, 180, 190, 
200 y 1420 aue no me coin- 
ciden con el Test de Lista- 
dos, de modo que les agra- 
decería que me dijeran si nay 
algún error de tipografía. 
Manuel Velitez Moreno 
Sevilla 

Las líneas 140 a 200 tienes 
que copiarlas exactamente 
como están en la revista. En 
cuanto a la línea 1420 hemos 
detectado que algunos ejem- 
plares han salido sin las co- 
millas (") de cierre después 
de PR1NT" La cifra del 
Test tiene que coincidirte. 



GRABACION 
DE TEXTOS 

Me gustaría saber cuales son 
las instrucciones para grabar 
en cinta y en cartucho textos 
y gráficos. También si hay 
en el mercado software de 
ajedrez y damas, especial- 
mente si Sony los tiene, y su 
precio. 

Eladio Gil 
Eibar (Guipúzcoa) 

Para grabar textos o gráficos 
necesitas un cartucho o cinta 
con un programa procesador 
de textos o gráficos. Con res- 
pecto al solfware de ajedrez 
las casas Sony y Philips lo tie- 
nen en catálogo y al de da- 
mas, conocemos el de Di- 
mensión New. El precio es de 
unas 2.000 pts. 



BARCELONA 
OLIMPICA 

Quería preguntaros si el 
programa BARCELONA 
OLIMPICA que publicás- 
teis en uno de vuestros ma- 
ravillosos números no con- 
tiene errores, pues yo me en- 
cuentro con ellos en varias 
líneas. Espero que las cintas 
que vais a sacar traigan bue- 
nos juegos para las vaca- 
ciones. 

Arturo Romero Vázquez. 
Irún (Guipúzcoa) 

Muchas gracias por tus elo- 
giosas palabras, le podemos 
asegurar que el listado de 
Barcelona Olímpica no con- 
tiene ningún error. De todos 
modos, habrás observado 
que a partir del número de 
noviembre incluimos un Test 
de verificación de Listados 
que esperamos te ahorre mu- 
chas horas de repaso de pro- 
gramas. En cuanto a las cin- 
tas, KRYPTON ya está a la 
venta, sólo tienes que relle- 
nar el cupón de pedido y te 
anunciamos desde aquí que 
ya está preparada práctica- 
mente la segunda, que se va 
a llamar U-BOOT... Espe- 
ramos que tú mismo seas 
quien juzgue su calidad. 



¡ATENCION! 
2.° CONCURSO 
«MI PROGRAMA» 

Rogamos a nuestros lectores 

3uc se ajusten a las normas 
el concurso, especialmente 
en cuanto a las condiciones 
de envío. Como ya sabéis las 
cassettes deben ir dentro de 

su correspondiente caja plás- 
tica con la etiqueta-cupón, 
que puede ser fotOCOpiada si 
no se desea recortar la revis- 
ta. Les agradecemos la ma- 
yor colaboración, dada la 
cantidad de programas que 
recibimos diariamente. 



EL TEST DE LISTADO 
Y LOS SVI 

Soy uno de vuestros más fie- 
les seguidores, remontándo- 
me hasta el primitivo* «Su- 
perjuegos». Por este motivo 
aprovecho para darles la lata 
con varios comentarios: 

• ¿Por qué no dedicáis 
algún capítulo especial a la 
adaptación del SVI 318/328 
a la norma MSX? 

• ¿Haréis cassette para es- 
tos ordenadores? 

• ¿Me podrían confirmar si 
el Test de Listados puede 
servirme para mi ordenador 
Spectravídeo 328? 

Angel Macías Gómez 
Bilbao 

Nos sentimos muy orgullosos 
de tener seguidores tan fieles 
como tú. Eso es lo que pre- 
tendemos: que nuestros lec- 
tores y nuestras publicaciones 
formen una familia muy 
bien avenida. 

• Como tu carta llegó de la 
salida de nuestro número 
anterior, ya habrás compro- 
bado que en el mismo publi- 
camos el artículo «Hagamos 
compatible el MSX con los 
Spectra», que esperamos te 
haya sido de utilidad. 

• Lamentablemente no te- 
nemos previsto editar casset- 
te para los Spectravídeo 
318/328. 

• El Test de Listado sólo te 
sirve para los ordenadores de 
la norma MSX. 

Somos un grupo de amigos 
de Madrid que estamos for- 
mando un pequeño club pa- 
ra el Spectravídeo SV328. Os 
escribimos poraue vuestra 
revista nos ayuda mucho a 
programar con nuestro 
ordenador a pesar de no ser 
totalmente compatible con 
el MSX. Nuestra pregunta es 
si podemos enviar progra- 
mas del SVI 328 al concurso. 
Enviaríamos dos listados, 



Editorial 



Opiniones 

Una de las prerrogativas de la prensa es la de 
manifestar libremente su opinión, sobre este 

Eunto creemos honradamente que no puede 
aber discusión posible. Y frente a esta 
indiscutible prerrogativa, se alza la del lector de 
comprar o no la publicación -o publicaciones-, 
que considere más en la línea de su criterio 
personal. Dicho esto, convendría de nuevo hacer 
hincapié en que el nacimiento de nuestra revista, 
al igual que la de su hermana EXTRA MSX, fue 
motivado por la evidente convicción de que en 
nuestro país al MSX le aguardaba un brillante 
futuro, ya que -jamás nos hemos cansado de 
pregonarlo-, dicho estándar significaba además 
de un paso hacia adelante, la instauración 
definitiva de la compatibilidad de periféricos, lo 
cual a la vista de los ordenadores personales que 
había en el mercado -léase Spectrum y/o 
Commodore- representaba una auténtica 
revolución, por lo que significaba huir de una 
vez por todas del maldito esclavismo de marca. 
Sin embargo para otras publicaciones, y así lo 
han reconocido públicamente, el nacimiento del 
MSX era una alternativa más, de dudoso 
futuro; se imponía según ellas una cierta 
precaución, el dejar pasar un tiempo prudencial. 
Ahora al parecer estas publicaciones, tras varios 
meses de aparición, de golpe y porrazo se dan 
cuenta de las ventajas de un estándar que cuenta 
en nuestro país con miles de usuarios, y auguran 
a bombo y platillo un futuro feliz para los que 
han confiado en el MSX. Si es cierto que errar es 
de humanos, el reconocer los propios errores 
resulta divino. Lo que ocurre es que para 
alcanzar dicho calificativo, el error se ha de 
reconocer abiertamente sin subterfugios ni 
fariseísmos, lo cual ciertamente resulta en 
ocasiones muy difícil, especialmente cuando se 
trata de hacer comulgar con ruedas de molino a 
los lectores, usuarios en definitiva del estándar y 
que por fortuna no se dejan impresionar por 
esos «mea culpa» entonados fuera de tiempo. 

Manhattan Transfer 



Línea directa 



uno para Spectravídeo y 
otro para el MSX. Muchos 
usuarios del Spectravídeo os 
lo agradecerían. 

El Club del «Spectra» 
Madrid 

Mientras estudiamos la posi- 
bilidad de hacer un concurso 
para el Spectravídeo, sabed 
que las páginas de MSX 
CLUB están disponibles pa- 
ra todos nuestros amigos lec- 
tores, y ¡cómo no!, para sus 
programas de MSX. 



EMISION/RECEPCION 
MORSE 

Ante todo quiero felicitarles 
por el artículo de los efectos 
de sonido aparecido en el 
mes de octubre. Por otra 
parte quisiera preguntarles si 
existe algún programa en 
versión MSX para emisión/ 
recepción de morse y RTTY 
sin necesidad de interface de 
ordenador a emisora y emi- 
sora/ordenador. 

Manuel Pérez Urbano 

Te agradecemos tu felicita- 
ción y nos alegra que tal artí- 
culo te haya ayudado a com- 
prender uno de los aspectos 
del MSX. Como bien sabes 
un interface es un cartucho 
que facilita la entrada y sali- 
da de datos de un aparato a 
otro, cuando las conexiones 
de ambos no son compati- 
bles. Para no utilizar interfa- 
ce es necesario que entre el 
ordenador y el periférico -en 
este caso el emisor-receptor- 
haya conexión directa. 



DIANA 
DE ROBIN HOOD 

He tecleado el programa 
«Diana de Robin Hood» 
aparecido en el n° 7 y el orde- 
nador me detecta un error en 




la línea 1 100, que he corregi- 
do como sigue: 1100 LO- 
CATE 7,21: PRINT «DE- 
SEAS SEGUIR JUGAN- 
DO? S/N: INPUT B$. 
Rocío de Diego y Rodrigo 
Córdoba 

Hemos comprobado el pro- 
grama y es correcto tal como 
está editado. De todos mo- 
dos, quisimos probar la co- 
rrección que nos envías y ésta 
no funciona. Te sugerimos 
que emplees el Test de Lista- 
dos y después nos comentes 
qué tal te ha ido, pues es se- 
guro que tienes algún error 
de tecleo. Buena suerte. 



CANON V-20 

He comprado un Canon 
V-20 y me gustaría saber qué 
opinión les merece técnica- 
mente este aparato, ya que 
todas las compañías dicen 
que sus máquinas son las 
mejores. 

Antonio García Alberdi 
Madrid 




Indudablemente has hecho 
una buena compra, ya que se 
trata de un aparato de gran 
calidad, robusto y potente. 
Esperamos que lo disfrutes y 
que nuestros programas te 
ayuden a sacarle el máximo 
provecho. 



COMANDO CIRCLE 



Hace muy poco que me 
compré un Sanyo MSX y 

Quisiera que me aclararan 
os cuestiones. He tecleado 
el siguiente programita: 
10CLS 

20 SCREEN 2 



AVISO IMPORTANTE 

PCM a que no era nuestra intención, lamentamos tener que 
comunicar el aumento de precio de nuestra revista a Ptas. 175,-. Ello 
obedece a dos razones. Primera la obligatoria aplicación del IVA \ en 

segundo lugar el aumento de los costes de impresión, papel y 
fotolitos, motivado por el incremento del índice del e<vtt# .1, h v\A* 




30 CIRCLE (70,70),40,10 
40 GOTO 40 

Pues bien, al ejecutarlo me 
sale el círculo, pero después 
no puedo volver al progra- 
ma. También deseo que me 
aclaren qué representan los 
números 40 y 10 que van 
después del paréntesis del 
CIRCLE. 

Gustavo A. Martín 
Las Palmas de 
Gran Canaria 

Para volver al listado del 
programa tienes que pulsar 
al mismo tiempo CTRL y 
STOP. Los números que van 
entre el paréntesis correspon- 
den a las coordenadas que fi- 
jan el punto central del círcu- 
lo. El primer número fuera 
del paréntesis -en tu caso el 
40- fija la cantidad de pun- 
tos o pixels del radio, mien- 
tras que el segundo corres- 
ponde al color -en tu caso es 
el amarillo oscuro (10)-. De 
modo que la sintaxis de este 
comando es: CIRCLE (co- 
ordenadas que determinan el 
punto central), radio (en 
puntos), color. 



CUPONES DE PEDIDO 

Si me permitís, voy a hacer- 
les una pequeña sugerencia 
con relación al lugar donde 
colocan los cupones de sus- 
cripción, votos, pedido de li- 
bros. Creo que lo más lógico 
es que los coloquen detrás 
de la publicidad porque si 
está detrás de un artículo te- 
nemos que romperlo y es 
una lástima que la revista 
quede recortada, de modo 
que muchas veces te quedas 
sin pedir lo que te interesa. 
Gracias por todo y ánimo, 
pues la revista es muy buena 
y nos ayuda a sacarle mucho 
partido al ordenador. 

Ricardo J. Duran 
Valladolid 

Tu sugerencia es muy razo- 
nable, pero a veces estamos 
obligados por cuestiones de 
compaginación, pero cuando 
eso sucede pedimos compren- 
sión a nuestros lectores, que 



si no quieren romper la re- 
vista, que es todo un halago, 
pueden copiar o fotocopiar el 
cupón, ya que lo que nos 
importa son los datos solici- 
tados en él. Gracias por los 
ánimos que nos das. 



¿PHILIPS 0 
SPECTRUM? 

Estoy a punto de comprar- 
me un ordenador y no sé por 
cuál decidirme. En realidad a 
mí me interesa un Philips, 
pero algunos amigos me di- 
cen que compre un Spec- 
trum, porque es mejor, cosa 
que dudo. También quisiera 
que publicaran las noveda- 
des que hay en juegos y su 
precio. 

Pedro Ruiz González 
Alicante 




Obviamente te tenemos que 
decir que el Philips MSX no 
sólo es mejor sino que ade- 
más es el que tiene más futu- 
ro, comparándolo con el 
Spectrum. En el n." 8, de di- 
ciembre, publicamos una ta- 
bla comparativa técnica que 
demuestra porqué es mejor 
un MSX. En nuestras pági- 
nas de Monitor al Día en- 
contrarás las novedades en 
software y periféricos que 
hay en España. 



TEST DE LISTADOS 

Deseo felicitaros por el 
acierto del «Test de Lista- 
dos», que permite hallar rá- 
pidamente el error y corre- 
girlo, evitando teclear en va- 
no a la vez que a vosotros os 
da la tranquilidad del trabajo 
bien hecho. De todos mo- 



dos, quiero saber cómo con- 
seguir los Test de los Lista- 
dos publicados en los núme- 
ros 1 a 6. 

Juan Viñas Trullenque 
Barcelona 

Mucho agradecemos tus elo- 
gios. El «Test de Listados» 
salió publicado en nuestro 
número 7, de noviembre. El 
Test de Listados de los pro- 
gramas publicados anterior- 
mente reaueriría una edición 
especial de dichos programas, 
la cual estamos estudiando. 



NUMEROS 
ALEATORIOS 

Tengo un HIT-BIT 75 y 
cuando programo la función 
RND ejecuta los números 
en la misma secuencia cada 
vez que hago RUN. Por 
ejemplo, en un programa de 
BINGO que estoy haciendo 
escribo: 

n = INT(RND(l) x 90) + 1 
Y cada vez que ejecuto el 
programa me genera los nú- 
meros en el mismo orden. 
¿A qué es debido esto?. 
¿Cómo puedo solucionarlo? 
Manuel Gil Fiestas 
(Barcelona) 

Cuando se habla de la fun- 
dón RND, en realidad es 
más correcto decir que gene- 
ra números pseudoaleatorios 
en lugar de números aleato- 
rios. Es decir: como muy 
bien has observado, genera 
los números en la misma se- 
cuencia cada vez que ejecu- 
tes el programa. Natural- 
mente esto sucede siempre 
que trabajes con constantes 
numéricas. Si en lugar de 
multiplicar por una cons- 
tante lo haces por una varia- 
ble, la cosa cambia. Te 
adjuntamos el siguiente mi- 
niprograma, que esperamos 
te ayude a solucionar tu pro- 
blema. 




PROBLEMAS DE 
SINTONIA 

Tengo un problema con mi 
ordenador (un TOSHIBA 
HX-10). Cuando lo sintoni- 
zo en el canal 36 de mi tele- 
visor da muy buena imagen 

Eero tan sólo se oye un zum- 
ido del ordenador. Si entro 
un programa de música ten- 
go que descentrar la imagen 
para oirlo. O sea: o lo veo o 
lo oigo. He probado en otra 
televisión con idénticos re- 
sultados. ¿Es el ordenador o 
un mal contacto en la salida 
RF? 

Javier Hernández 
(Barcelona) 

Lo más probable es que no se 
trate de un problema del 
ordenador sino del canal que 
has sintonizado. Trata de lo- 
calizar la imagen en otro ca- 
nal y posiblemente consigas 
también obtener el sonido. 
Caso de que no puedas ha- 
cerlo ponte en contacto con 
tu vendedor. 



CARTUCHOS... 

Quiero hacerles una consul- 
ta sobre cómo solicitar nú- 
meros atrasados, ya que me 
es imposible enviarles un ta- 
lón. 

También me gustaría saber si 
con un cartucho de amplia- 
ción de 16K obtengo la mis- 
ma memoria de usuario que 
con el de 64K ¿Qué ventaja 
hay si tengo la misma RAM 
disponible? 

Feo. Rodríguez Borrego. 
Paterna (Valencia) 

Si no te es posible enviarnos 
un talón también puedes sol- 
sicitar los números atrasados 
mediante un giro postal. 
Efectivamente, tanto con el 
cartucho de expansión de 
16K como con el de 64 K 
obtienes la misma RAM de 
usuario. La diferencia estri- 
ba en que si colocas un cartu- 
cho de 64K puedes además 
conectar una unidad de dis- 
co, mientras que con el de 16 
no. 
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Esta sección de MSX CLUB es de nuestros lectores. Todos ellos tienen derecho a tres inserciones totalmente 
gratuitas. Las características de esta sección no permiten la inclusión de anuncios con fines de lucro. 



Intercambio Blagger, cuyo 
costo es de 2.500 pts, por pro- 
grama de contabilidad domés- 
tica u otro similar. Preguntar 
por Miquel en el Tel. (93) 
873 12 38. Fonts deis Cape- 
llans (Barcelona). CP1. 
Vendo/cambio cartucho 
Track & Field I (4.900 pts.) y 
tres cassettes -Lazer Bykes, 
Maziacs y Traga Manzanas a 
500 pts. cada una. Juan Feo. 
Gómez, c/Rda. S. Antonio de 
Llefiá B.5, 2." L\ Badalona - 
Tel. 388 89 08. CPl. 
Contacto con usuarios MSX 
de Badalona. Juan Feo. Gó- 
mez Martínez. c/Ronda S. 
Antonio de Llefiá B.5, 2.° l.\ 
Badalona - Tel. 388 89 08. 
CPl. 

Intercambio programas 
MSX. Poseo Gusano, Orga- 
no, Curso Basic MSX, Morse, 
Observatorio Astronómico, 
etc. Enviar cinta a Jordi Fe- 
rrán. c/Matajudaica 10, Corc.a 
(Gerona). CPl. 
Intercambio programas MSX 
en disco de 5 1/4 preferible- 
mente de gestión y CP/M. 
Francisco Esquivel - Papelería 
Don Papel, Parque Fidiana Bl. 
2. 14014 Córdoba. CPl. 
Vendo programa «procesador 
de Textos Compor» de Phi- 
lips, baratísimo y sin usar con 
manual de instrucciones en 
castellano. 32 K. Jesús Con- 
trera Luna. Angeíita Capde- 
vielle 5, 3." Izda. 10002 ¿áce- 
res. Tel. 22 38 19. CPl. 
Vendo ordenador Sony HB 
55P c/cartucho ampliación de. 
memoria de 16 K, un cassette 
marca Fujiyama, joystick 
Quickshotl y más de 40 pro- 
gramas. Tocio 60.000 pts. Ja- 
vier. Tel. (986) 209 337. CPl. 
Vendo Manic Miner, Stop 
The Express, Snowman, Pun- 
chy, Billar Americano, Pira- 
mid, Warp, River Raid, HE- 
RO. Todos por 1.600 pts. 
Llamar entre 2 y 3 de la tarde. 
Preguntar por Nacho Ba- 
rrientos. Tel. 41 46 1 7 de Vigo 
o escribir a c/Barcelona 77, 3.° 
B, Vigo 11. CPl. 
Contacto con usuarios MSX 
para intercambio de opinio- 
nes, trucos y programas. Co- 
legas os podéis poner en con- 
tacto conmigo, Jorge Hernán- 
dez López, en el Tel. 
247 55 84 o en Churruca 16, 
Dcha. 14. Puerto Sagunto 
(Valencia). CPl. 
Vendo Spectravídeo SVI 328, 
Data Cassette SVI904, Quick 
Shot I, cartucho (Sector Alp- 
ha), todo el software comer- 
cial de Spectravídeo, de jueeos 
y aplicación y eran cantidad 
de programas de todo tipo. 
Todo en perfecto estado. Muy 



barato. Precio a convenir. Ru- 
bén Algarra. Tel. (91) 
711 41 04.c/Temblequel6,2.° 
B -28024 Madrid. CPl. 
Vendo-cambio toda clase de 
programas comerciales MSX 

Sue no superan los 48 K de 
AM. Enviar lista. Contesta- 
ré a todos. Ramón Oró Mont- 
serrat. c/Lérida s/n. Artesa de 
Lérida (Lérida). CPl. 
Intercambio programas de 
MSX sin fin económico. Po- 
seo Hero, Blagger, Zaxxon, 
Beamrider, etc. Contestaré a 
todos. Francisco García. 
Apdo. de Correos 1520. Va- 
lencia. CPl. 

Intercambio toda clase de 
juegos y trucos de programa- 
ción. Poseo más de 60 jueeos. 
Escribir a Sgo. Bustos Mer- 
chante, c/Cervantes 6, 4." C 
-16004 Cuenca o al Tel. (966) 
21 10 92 de 15 a 16 h. o de 
20.15 a 23.30 h. CPl. 
Vendo cartuchos del Imperio 
Contraataca y Q-Bert para 
Intellevision y Action Forcé 
para Atari a 1.500 pts. cada 
uno. Preguntar por Marcelo 
en el Tel. (93) 200 86 07 de 
Barcelona de 14 a 15 h. única- 
mente. CPl. 

Contacto con otros usuarios 
de MSX para intercambio de 
programas, dudas, experien- 
cias. Ricardo José Durán Ca- 
rrasco. c/Las Moradas 36, 3.° B 
-47010 Valladolid. CPl. 
Intercambio programas MSX 
en código maquina. Cercely, 
Blagger, Manic Miner, Chess, 
etc. Juan González. Tel. 
463 67 46, c/Zuberoa 6, 2." C. 
Lejona (Vizcaya). CPl. 
Vendo Sony HB75P 64 K, 
más grabadora Altai, prog. Si- 
mulador de vuelo, juegos, li- 
bros de MSX. Todo nuevo a 
68.000 pts. Llamar a Pedro al 
Tel. (94) 463 05 87 o escribir 
Apdo. Postal 120, Las Arenas 
(Vizcaya). CPl. 
Vendo Spectravídeo 720 MSX 
c/embalaje original, manual 
en español, garantía In- 
descomp, a estrenar a 28.000 
pts. Miguel Moreno, c/Cata- 
luña 48, 3.° 2.\ El Prat (Barce- 
lona). CPl. 

Vendo consola de videojue- 
gos Atari junto a nueve cartu- 
chos -Defender, Superman, 
Combat, Space lnvader, 
etc.)-. Precio a convenir. 
Cambio cassettes de jueeos 
p/Spectravídeo 318/328. Lla- 
mar a Jorge, Tel. (93) 
331 93 65. CPl. 
Vendo/intercambio progra- 
mas MSX p/gestión, educati- 
vos y jueeos. Juan Miguel 
García. c/Gaudí 64, 1." 1.', 
Reus (Tarragona). CPl. 
Intercambio programas que 



son los siguientes: Apren- 
diendo Inglés I, Curso Basic 
MSX, Super Chess, River 
Raid, Máxima, Geografía de 
España, etc. y todos los pro- 
gramas aparecidos en EXTRA 
MSX y MSX-CLUB. Jordi 
Márquez Batlle. c/Unión 71, 
3." l.\ Premiá de Mar (Barce- 
lona). Tel. (93) 751 56 22. 
CPl. 

Vendo mando p/ordenador 
MSX. También p/Commodo- 
re, Atari, etc. a 1.200 pts. mar- 
ca JS 101 Anitech. Dirigirse a 
Daniel Pavón c/Llibertat 17, 
Vilassar de Dalt (Barcelona). 
CPl. 

Contacto con otros usuarios 
de MSX para intercambio de 
programas e información. 
Manuel Ponce Castro. Avda. 
Solís Pascual 29, 1.°, Ubrique 
(Cádiz). CPl. 

Contacto con usuarios de 
MSX de Reus. Apúntate al 
club «Todo MSX», es gratui- 
to. Escribe a «Todo MSX», 
Att. Juan C. de la Llana, c/ 
Lleona 12, 2. Reus (Tarrago- 
na). CPl. 

Intercambio programas o 
cintas. Poseo primeros títulos, 
especialmente de utilidades 
(Gerente, Contabilidad do- 
méstica, etc.) y juegos. Do- 
mingo Gallego Pinero. c/Le- 
vante n.° 1, entio. 2. J , Barcelo- 
na. CPl. 

Contacto con usuarios de 
MSX de Oviedo p/intercam- 
bio de programas e ideas. Je- 
sús Polledo. Tel. 224 234. 
CPl. 

Vendo Spectravídeo 328 
-comprado en junio 1985-, 
data cassette, 4 manuales, TV 
b/n y 25 programas comercia- 
les. Todo por 60.000 pts. Ra- 
món Llorens Moreno, c/Gui- 
púzcoa 8, 6." l.\ 08018 Barce- 
lona. Tel. (93) 308 62 53. CPl. 
Cambio cartucho Monkey 
Academy por otro cartucho y 
en concreto E.I. o por dos 
cintas especiales de no más de 
16 K. Juan Luis Martínez, 
Vistasul T.° 11, 1.° 4.*; Dos 
Hermanas (Sevilla). CPl. 
Vendo ordenador Sony de 
64 K con más de 70 progra- 
mas de juegos, educativos y de 
gestión. Todo 73.000 pts. Jor- 
ge Lafuente Bartra, Avd. de 
Madrid 30-34, 3." 3.', 08028 
Barcelona. Tel. (93) 333 45 36. 
CPl. 

Intercambio y compro todo 
tipo de programas en disco 
para SVI 328. Mandar lista a 
Juan Antonio Blanco García. 
Av. Tomás Giménez, 28, 3.°, 
2. a . Hospitalet (Barcelona). 
CP2. 

Cambio equipo de revelado 
fotográfico (ampliadora, cu- 



betas, bombo para rollo de 
película, secadora, temporiza- 
dor y otros accesorios) por 
Spectrum 48/64 K. Manuel 
Pérez Urbano. P.° San Juan, 
51. (Peluquería) 08009 Barce- 
lona. Ref. CP2. 
Contacto con usuarios de 
MSX de Marbella. Guillermo 
García Guerrero. Jacinto Be- 
navente. Edif. Marbelsum II, 
3.°, 2.'. Marbella (Málaga). 
Ref. CP2. 

Intercambio programas de 
todo tipo para ordenadores 
MSX. Mandar lista. Contesta- 
ré a todos. Carlos Bachiller 
Gil. Doctrina, 7, 1.- D - 42002 
Soria. Ref. CP2. 
Contacto. I like to corres- 
pond with spanish MSX-users 
to exchange programs, in- 
formation, etc. I make pro- 
eram in Basic as Machine 
Language. Erwin Oei - Wolf- 
senwaard 2, 6932 BL Wester- 
voort - Holland - Ref. CP2. 
Vendo Spectravídeo 728 con 
garantía, adauirido en octu- 
bre/1985. Ad junto programas 
texto y datos y manual. Precio 
total 40.000 pts. Ramón Do- 
mingo Mustarós. Calabria, 
174, 3.°, 2.' - 08015 -Barcelo- 
na. CP2. 

Intercambio programas de 
juegos o utilidades para MSX. 
Escribir, llamar o enviar vues- 
tros programas a Angel Tomé 
Carrillo, Paseo de Zorrilla, 71, 
\> izqda. 47007 - Valladolid - 
Tel. (983) 23.29.62. Ref. CP2. 
Vendo ordenador Sony MSX 
v accesorios. Todo nuevo. 
Muy barato. Envío lista deta- 
llada a quien lo solicite. José 
Manzanos Alesanco, Avda. 
Estibaliz, 2.° 6 A - 01004 - Vi- 
toria. Ref. CP2. 
Envíame cinta con tus pro- 
gramas y te lo devolveré con 
muchos otros en Basic y Có- 
digo Máquina. José Salas Jo- 
dar. Dip. Tiata. Lorca (Mur- 
cia). CP2. 

Cambio más de 40 buenos 
programas comerciales -Buck, 
Manic, Contabilidad, Proce- 
sador de textos, etc. — , por 
cartucho ampliador de memo- 
ria de 16 o 64K. Rubén Soto. 
Teruel, 4. Tudela de Duero 
(Valladolid). CP2. 
Vendo Sony HB55, amplia- 
ción de memoria 64K, casset- 
te, cartucho y cinta de juegos, 
libro Basic y muchas revistas. 
Todo en perfecto estado por 
49.000 pts. Llamar a Raúl al 
tel. (91) 273 18 48. De 12 a 17 
h. Ref. CP2. 

Vendo Spectravídeo SV 318 
de 32K con data cassette por 
35.000 pts. Regalo 60 jueeos y 
utilidades, libros y revistas. 
Cipriano Dopico Barreras. 
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Escocia, 94 bajos, 1>, 08016 
Barcelona. CP2. 
Cambio ciclomotor Derbi 
Variant en buen estado por 
ordenador MSX de 48 o 64K 
y cassette expansión RAM de 
16 o 64K. Valoraré cualquier 
oferta. Angel Alfonso Amor 
Cabado, Ronda de Outerio, 
416, 3.° dcha. 15011 La Co- 
ruña. CP2. 

Contacto con usuarios del 
MSX e IBM para formar un 
club en Alhama de Murcia. 
Más información dirigirse a 
José Martínez Fuertes, Av. 
Bastarreche n° 12b, Alhama, 
300009 (Murcia). CP3. 
Contacto con chicos/chicas 
usuarios del MSX de mi loca- 
lidad. Marcos Fajardo Orella- 
na. Parque Mediterráneo Blo- 
ue 15, Piso 5 o Izq. Málaga, 
el. 34 37 38 de 12,30 a 2,30 o 
5 a 6,30. CP3. 

Cambio cintas con 30 juegos 
y 3 de utilidades por uno de 
estos juegos: Space Trouble, 
Battle Cross, Juno First, Do- 
rodón, Máxima, Zaxxon, etc. 
Chuchi. Telf. 22 38 19 - Cáce- 
res. CP3. 

Intercambio programas MSX. 
Poseo más de 20 títulos. 
Alberto Pardo Hernández. 
Tel. (93) 422 72 25. CP3. 
Intercambio programas MSX 
en código maquina. Sorcery, 
Blageer, Manic Miner, Chess, 
etc. Juan González. Tel. 463 
67 46 de Vizcaya. CP3. 
Intercambio programas MSX 
en disco de 5/4 preferible- 
mente de gestión y CP/M. 
Francisco Esquivel Parque Fi- 
diana Bl. 2 14014. Córdoba. 
CP3. 

Atención Si eres de San Se- 
bastián y dispones de un 
MSX, ponte en contacto con- 
migo. Antonio Millán San 
Emeterio c/. Matía 44 - 4 - 
DHC. S. Sebastián 20008 - 
Tel. 21 64 66. CP3. 
Intercambiamos cintas, ideas, 
trucos e información para 
Spectrum. Club Onubasoft, 
apt. de correos 1212. Huelva. 
CP3. 

Vendo Super Expander del 
Spectravídeo, controlador de 
disco y dos unidades de disco 
5 1/4" simple, cara doble den- 
sidad. Todo por 55.000 pts. 
José Puievert Bonfill. c/Ma. 
Lucía 1, Canet de Mar (Barce- 
lona). Tel. (93) 749 11 30. 
Necesito urgentemente pro- 
grama MSX que controle ca- 
rreras de marathón y de los 
resultados por impresora. 
Antonio Millán. Tel. (943) 
216466. CP3. 

Vendo Spectravídeo SV328, 
super expander 605B, en ga- 
rantía, CP/M y Basic Disco, 
cassette, revistas y programas, 
por 200.000 pts. Monserrat 
Sala. - Tel. (93) 427 39 50. 
CP3. 

Intercambio o vendo progra- 
mas MSX. Poseo Zaxxon, 
Ghostbusters, Manic Miner, 
etc. y programas de gestión. 



José M* López Herrera, c/. 
Montoya 1,1" A, Alcantarilla 
(Murcia). CP3. 
Mándanos tus programas en 
una cinta y la recibirás cargada 
con otros nuevos. Tomas Eis- 
man Domenech. c/. Atillo, 19 
- 14009 Córdoba. Ref. CP3. 
Usuarios de SPECTRAVI- 
DEO 728 o MSX en general, 
agradeceríamos contacto para 
intercambiar programas, ideas. 
Soto, Blach, Arribas - Central 
Telex, Telégrafos, Plaza del 
País Valenciano - 46002 Va- 
lencia. 

Intercambio cartucho Alí- 
Babá y otros. José M. Váz- 
quez, c/. Entrepeñas, 42 - La 
¿oruña - Tel. (981) 25 26 87. 
Ref. CP.3. 

Para los usuarios de Cuenca. 
El club infantil OCIO MSX 
creado en julio de este año, 

{>retende poner en contacto a 
os usuarios de este estándar. 
Dirigirse a Mariano Delgado 
García, c/. Hermanos Bece- 
rril, 3. Cuenca. Tel. (966) 
22 26 68. Ref. CP.3. 
Intercambio programas del 
sistema MSX. Alberto Cama- 
cho Fernández, c/. Nafarroa, 
15, 6.° P. Basauri. Vizcaya. 
Ref. CP.3. 

Desearía intercambiar pro- 
gramas, dispongo de más de 
50. José Ignacio Nasarre. c/. 
Franco y López, 11 - 50005 
Zaragoza. Tel. (976) 35 61 77. 

Intercambio programas, du- 
das, inquietudes con usuarios 
MSX. José Atxurra Par. Itu- 
rribide, 2-5.» E. 48006 Bilbao. 
Ref. CP3. 

Intercambio programas. Zax- 
xon, Manic Miner, Les Flics, 
Congo Bongo y Shark Hunter 
por El Samurai, Ghostbuster, 
Beamrider o Decathlon. Javier 
Vi la Lugo - París 6, 3.°C To- 
rrejón de Ardoz (Madrid). 
Ref. CP3. 

Intercambio programas He- 
ro, Keystone Kapers, Polar 
Star, etc. y aparecidos en esta 
revista. José Corrales-Av. de 
Cortés, 22, 1." Aptdo. 
59-Ubrique (Cádiz). Ref. 
CP3. 

Cambio cartucho de ROM 
Step-Up por Edyll, Billar, 
Antartic Adventure, Tenis, 
Crazy Train, etc. Cristóbal 
Martín Basoa- Villa Soledad, 
28-30, 2. u izq. El Ferrol. - Ref. 
CP3. 

Contacto, con otros usuarios 
de MSX para formar un club e 
intercambiar ideas y progra- 
mas. José L. Fernández Av. 
Fdez. Ladreda, 58, 6.° Gijón 
(Asturias) - CP3. 
Intercambio programas MSX. 
Paseo Booga, Hunch, Jetset 
Willy, Almacén, Databa, etc. 
José Manuel Vera Vilchez, 
Escritor José de las Heras, 3, 
Córdoba 14014 - Ref. CP3. 
Intercambio ideas y progra- 
mas. Javier Iniesta. Av. Ntra. 
Sra. Fátima 27, Madrid 28047. 
Ref. CP3. 



POR FIN, PARA COMPLACER 
A NUESTROS LECTORES LLEGA 

msxclub 



de CASSETTES 



PROGRAMAS DE ALTA CATEGORIA 
PARA LOS USUARIOS DEL MSX 




KRYPTON: La batalla más audaz U-BOOT: Desde el puente de 
de las galaxias en cuatro pantallas y mando de tu submarino, intenta 
seis niveles de dificultad, para los hundir al crucero enemigo que 
amantes de las sensaciones Tuertes. quiere darte caza. Provisto de peris- 
copio de superficie, carta de nave- 
gación, sonar de profundidad, ra- 
dar de localización, indicador de 
combustible, compás de rumbos v 
almacenaje de torpedos. Con U- 
BOOT sentirás la autenticidad de 
las grandes gestas navales. 



Si quieres recibir estas cassettes recorta o copia el boletín 
adjunto: 



Nombre y apellidos 

Dirección 

Población Provincia 

Código postal 

□ KRYPTON precio 

□ KRYPTON precio suscriptores 

□ Gastos envío certificado 

□ U-BOOT precio 

□ U-BOOT precio suscriptores 

□ Gastos de envío certificado 

Total 

Remito talón bancario de Ptas.. 
MANHATTAN TRANSFER, S.A. 



Ptas. 
Ptas. 
Ptas. 
Ptas. 



500,- 
450,- 
70,- 
700- 



Ptas. 630,- 
Ptas. 70- 

Ptas. 
a la orden de 



IMPORTANTE: 

Indicar en el sobre MANHATTAN TRANSFER, S.A. 

CLUB DE CASSETTES 
c/. Roca i Batlle, 10-12 bajos 
08023 Barcelona 



NUESTRAS CASSETTES NO SE VENDEN EN 
QUIOSCOS, LA UNICA FORMA DE ADQUIRIRLAS ES 
SOLICITANDOLAS A NUESTRA REDACCION. 
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Programa Por Antonio Cano, 



LA GALLINA CIEGA 



Tenemos aquí una versión 
muy entretenida del popular 
juego de la «gallinita ciega» 
en el que pueden intervenir 
hasta cinco personas, cada 
una con su propio color. 




«La Gallina Ciega» es un programa que 
tiene muchas posibilidades de variación 
y que, en consecuencia puede ser mo- 
dificado, según el gusto de cada usua- 
rio. Se puede perfeccionar, por ejem- 



plo, el movimiento de las figuras, poner 
un acumulador de tiempo en lugar del 
contador, etc. Su autor, Antonio Cano, 
advierte que el funcionamiento de los 
muñecos que se esconden en la pantalla 



se debe a los efectos de zonas de colo- 
res en SCREEN 1, de acuerdo con la 
sentencia de la línea 1400. 



20 '% LA GALLINA CIEGA $ 
30 ' $ Ce) Antonio Cano 
35 "A PARA MSX-CLUB $ 

40 '^mx^mmwwmK 

50 COLOR ,4 ¡SCREEN 3 5 0PEN "grp:"AS 
#1 

60 PL A Y " s 1 3m200 fdlOf 1 0g 1 0a5g 1 0 f 5g5 

a 1 Og 1 O f 1 OeSd 1 0 c 5 f c 1 0 f 1 Og 1 Oag 1 0 f 5d 

5aSf SgaSf " 

70 FOR l%*0 T0 14 

SO FOR H%=0 Tü 200 ¡NEXT 

90 COLOR IX, , l*+1 

1 00 PRESET C 1 00 , 20 ) , 4 ! PR I NT# 1 , " LA" ! 
PRESET ( 20 , 70 ) , 4 ! PR I NT* 1 , " GALL I NA" : 
PRESET C 50 , 1 20 ) , 4 ! PR I NT# 1 , " C I EGA" 
1 1 0 NEXT 

120 IF PLAY<1 ><>0 THEN 120 

1 30 COLOR 5,1,51 SCREEN 1,2,0: KEY 0 

FF : W I DTH 30 ! R%=RND C -T I ME ) 

1 40 LOCATE 10,1: PR I NT " I NSTRUCC I ONE 

i"- }} 

150 LOCATE 2,3:PRINT"Este es el el 
asico juego la Gallina Ciega. Ju 
egan cinco jugadores con sus res 
pecti- vos colores: ro j o , azul , am 
a- r i 1 lo , verde , blanco . " 
160 LOCATE 2,S:PRINT"E1 jugador qu 
e hace de ga- llina ciega debe 
buscar por la pantalla a los den» 
as.Pa- ra ello tiene los curso re 
s. " 

170 LOCATE 2, 12:PRINT"E1 jugador q 
ue caiga en las garras de la gal 
lina ciega hará de esta en la s 
i guien- te jugada." 
1 80 LOCATE 2 , 1 6 : PR I NT "El j ugado r q 
ue menos tiempo tenga al final g 
anara. Este tiempo podra ser red 
ucido o aumentado en función de 
las intervenciones de cada juga 

dor . " 
190 GOSUB 2020 

200 PLAY" s 1 3mS00f 5f 1 Of 1 5f 1 Od 1 Of 1 Og 
1 0a5g 1 0 f 5gSg 1 Og 1 5g 1 Oa 1 Og 1 0 f 1 OeSd I 0 
c 5 f Sf 1 Of 1 5f 1 Oc 1 Of 1 Og 1 Oa 1 OaSg 1 Of 5d 
5a5f SgSgSaSf 5f5" 

2 1 0 C0« C 1 ) =6 : CO* ( 2 > =7 : tWÍ í 3 ) = 10: CO 

%<4>=12:C0%C5>=14 

220 ' SPRITES 

230 FOR 3%=Q TQ 2 

240 FOR 1**1 TO 8 

250 READ C* 

260 A*=A*+CHR* í VAL C " &b " +C* ) ) 
270 NEXT 



2S0 SPR I TE* í J* ) «A* 
290 A*="" : NEXT 
300 FOR I*=3 TO 6 

3 1 o A*=" " : B*=" " : E*=" " : F*=" " 

320 FOR J*»l TO 16 
330 READ C* 

340 A*=A*+CHR* C VAL C " &b" +LEFT* ( C* , 8 

> ) ) 

350 B*=B*+CHR* C VAL < " &b" +R I GHT* C C* , 

8 > J ) 

360 FOR H%=1ST0 1 STEP-1 ¡ G*=G*+MID 
*<C*,H%, 1 > ¡NEXT 

370 F*=F*+CHR* ( VAL C " &b" +LEFT* < G* , 8 

) ) ) 

380 E*=E*+CHR* < VAL ( " 8*>" +R I GHT* C G* , 

8 ) > ) 

390 G*="" ¡ NEXT 
400 SPR I TE* C I % ) = A*+B* 
4 1 0 SPR I TE* ( I »+4 ) =F*+E* 
420 READ PL$¡PLAY PL* 
430 NEXT 

440 IF PLAYC1'.)<>0 THEN 440 

450 DATA 011111 00 

460 DATA 11111110 

470 DATA 1 111 11 1 0 

480 DATA 11111110 

490 DATA 11111111 

500 DATA 11111110 

510 DATA 11111 000 

520 DATA 011111 10 

530 DATA 001 11110 

540 DATA 0111 1 1 11 

550 DATA 01111111 

560 DATA 01 1 11 111 

570 DATA 11111111 

580 DATA 01111111 

590 DATA 0001 1111 

600 DATA 0111 1 110 

610 DATA 011 1 11 10 

620 DATA 11111111 

630 DATA 11111111 

640 DATA 1 101 1 01 1 

650 DATA 11111111 

660 DATA 01111 1 10 

670 DATA 01 1 001 1 0 

680 DATA 0111 1 1 10 

690 DATA 000000 111 1000000 

700 DATA 00001 111111 00000 

710 DATA 0001 11111111 0000 

720 DATA 001 1111111111 000 

730 DATA 01 1 1 1 111 11 1 1 1 100 

740 DATA 11111111111111 00 

750 DATA 1 1 1 1 1 11 1 1 101 111 1 

760 DATA 1 1 1 1 111 111001 1 1 1 

770 DATA 1 1 1 11 111 1 1000100 
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Programa 




780 
790 
800 
810 
820 



DATA 1111 000000000000 
DATA 01 10000000000000 
DATA 01 10000000000000 
DATA 0000000000000000 
DATA 0000000000000000 
8 30 DATA O O O O 0000 O O O O O O O O 
840 DATA OOOOOOOOOOOOOOOO 
850 DATA " s 1 3m600 f 5 f 1 O f 1 5 f 1 Od 1 O f 1 Og 
10a5gl0f5" 

860 DATA 0000111111000000 

870 DATA 00001 11111 000000 

880 DATA 00001 111111 00000 

890 DATA 00001 lililí 00000 

900 DATA 00001 11111111 000 

910 DATA 0001 1 1 1 001 1 1 1 000 

920 DATA 0001 1 1 1 001 1111 00 

930 DATA 11111 1 10001 1 1 100 

940 DATA 1111111 0001 1 1 1 00 

950 DATA 1111H 10001 1 1 100 

960 DATA 1100000000111100 

970 DATA 1100000000011111 

980 DATA 000000000001 1111 

990 DATA OOOOOOOOOOOOOOOO 

1 000 DATA OOOOOOOOOOOOOOOO 

1010 DATA OOOOOOOOOOOOOOOO 

1 020 D AT A " s 1 3rr.600g5g 1 Og 1 5g 1 Oa 1 Og 1 O 

f 1 OeSdl 0c5f 5f 1 Of 1 Sf 1 O" 

1030 DATA 001 1111111111111 

1040 DATA 0111 1 11 111 n n 1 1 

1050 DATA 01 1 1 1 11 1 1 1 1 1 1 1 1 i 

1 060 DATA llllllllllllim 

1 070 DATA llllllllllllini 

1080 DATA 1 1 101 1 1 1 1 111 1 n l 

1090 DATA 1 1 101111 1 1 11 1 TI l 

I 100 DATA 1 1 101 llllllllin 

II 10 DATA 1110111111111111 
1 1 20 DATA 1 1 1 0000000001 1 1 1 
1 1 30 DATA 01 1 0000000001 1 1 1 
1140 DATA 0110000000000110 
1150 DATA 0000000000000110 
1 1 60 DATA OOOOOOOOOOOOOOOO 
1 1 70 DATA OOOOOOOOOOOOOOOO 
1 1 80 DATA OOOOOOOOOOOOOOOO 

1 1 90 DATA" al 3m600c 1 Of 1 Ogl Oal Oafigl O 
f BdSaSf 5g5g5a5f 5f 5" 
1 200 DATA 00001 1111111 0000 
1 2 1 O DATA 0000 11111111 0000 
1 220 DATA 0000 I 11111111 000 
1230 DATA 00001 11111111 000 
1 240 DATA 00001 1 1 001 1 1 1 000 
1250 DATA 0000111001111000 
1 260 DATA 00001 1 1 00 I 1 1 1 000 
1 270 DATA 00001 1 1 001 1 1 1 000 
1 280 DATA 00001 1 1 001 I 1 1 000 
1 290 DATA 00001 1 1 001 1 1 1 000 
I 300 DATA 00001 1 I 001 I I 1 000 
I 310 DATA 00001 1 0001 1 1 1 000 
1 320 DATA 00001 1 00001 1 0000 



1330 DATA 0000000000110000 
1 340 DATA OOOOOOOOOOOOOOOO 
1 350 DATA OOOOOOOOOOOOOOOO 
1360 DATA"" 
1 370 COLOR ,1,1: CLS 

1380 CO«=INTCRND< 1 3*53+1 : SWAP C0%( 
1 > , C0% C C0% ) 
1390 G0SU8 2020 

1 400 X%= 1 27 ¡ Y%=95 ! Z 1 %=2 ! Z2%=5 ¡ P%= 1 
¡GOSUB 1660 

1 4 1 O PLAY" s 1 SmS'OObr 64fc>r 64n9" 

1420 IF PLAYC I ><>0 THEN 1420 

1430 ' RUTINA PRINCIPAL 

1440 TIME=0:MI%=0 

1 450 C%=1 NT ( RND C 1 ) * 1 6 3 

1460 IF C%=PO I NT C X% , Y% 3 THEN USO 

1470 FOR T%=0 TO 100 

1 430 DE%=TIME\5 ¡ DE$=STR*< DE% > ¡ DE%= 

VAL C R I GHT* ( DE* , 1 ) ) ; SE%=VAL < LEFT* C D 

E*,LEN<DE*>-1 3 3 

1490 IF SE5Í>59 THEN MI%=MI%+1 ! TIME 

=0 

1 500 LOCATE 1 0 , 1 \ PR I NTM I % ¡ " ! " ; f.E% 
" ! " ; DE% 

1510 ON STICKCO) GOSUB 1560, 1670,1 
570, 1670, 1530, 1 670 , 1 6 I O 
1520 IF PO I NT ( X % , Y% 3 =C% THEN 1690 
NEXT 

GOTO 1450 

' MOVIMIENTO DE SPRITES 
Y%=Y%-l:ON P% GOTO 1590,1600 

x%=x%+i : zi %*ó : Z2%-3 : goto i 62Ó 

Y%=Y%+1:0M P% GOTO 1590,1600 
Z 1 %=2 ¡ Z2%=S ¡ F%=2 : GOTO 1 620 
Z 1 %=2 I Z2%-9 : P%= 1 ! GOTO 1 $20 
X%=X%-1 :Z1%=1 :Z2%=7 
IF X*<1 1 THEN X%=1 1 
IF X%>228 THEN X%=228 
IF Y%<18 THEN Y%=18 
IF Y%>148 THEN Y%=148 
BEEP : PUT SPR ITE O , C X%+4 , Y% ) , 1 



1 530 
1 540 
1 550 
1 560 
1 570 
1 580 
1 590 
1 600 
1610 
1 620 
1 630 
1 640 
1 650 
1 660 



<X%, Y%+8) ,C05ÍCC 
2, CX«,Y%+173 , 15 



Z1«:PUT SPR ITE 1 
05Í),Z2%:PUT SPR I TE 

2%+l 
1670 RETURN 
' FINAL 
COLOR 15,4,5 
M%=C0%CC0%>-6 

M 1 % < M% 3 =M I % : M2% C M% 3 =SE% ! M3% c M 
%)=DE% 

1 720 SWAP C0% (. CQ% 3 , CQ% C 5 5 ! J%=0 ! X 1 % 
<1 )=X%+4¡Y1%C1 3«Y* 
1730 FOR I%=2 TO 4 

x i % <: i % :> = i nt <: rnd <: i > *2 1 9 3 + 1 o 

Y 1 % C I%:)=Y1%( I%> + 15 
FOR Z%=1 TO 4 
IF Z%*1% THEN 1790 
IF Y1%CI%)-30<Y1%CZ%:) AMD Y1% 



1 680 
1 690 
1 700 
1710 



1 740 
1 750 
1 760 
1 770 
1 780 
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<: i%:>+30>yi %<Z% 

1790 NEXT : NEXT 
1800 POR I%=10 
1 

1 8 1 O 



> THEM 1750 
TO 19 STEP 3:J%=J%+ 



PUT SPRITE 1%, <.y.1 %(.J%>+ A, Yl%< 
1 3 .. O : PUT SPR I TE I %+ 1 , C X 1 % C 3% 3 
, Y 1 % (. J% 3 +8 3 , CD% (. J% 3 , 3 : PUT SPR I TE I 

%+2 , <: x i % ( ir* > , y i % <: j% :> + 1 7 :> , i s , 4 

1820 NEXT 

I 830 PL A Y " 8 1 3M200C 1 0E56FF 5E3SB A 1 OB 

1 0F5G 1 0EE5A 1 OG 1 OBB 1 5G 1 SE 1 SO 1 SC " 

1840 Í'F PLAYÍ 1 :><>0 THEM 1840. 

¡850 FOR I%=1 TO 5: Yl%< 1% 3=0: NEXT 

1360 FOR I%=10 TO 19 STEP 3 

1 370 PUT SPR I TE I % , t O , O ) , O , O ! PUT S 

PR I TE I %+ 1 , < O , O ) i 0 , 3 : PUT SPR I TE 1% 

+2 , <] O , O 3 ,0,4 

1880 NEXT 

1890 ' MARCADOR 

1900 CLSlGOSUB 2020 

1 9 1 O PUT SPR I TE O , ( 204 , 90 > , 1 3 , Z 1 % \ 
PUT SPR I TE 1 , C 200 , 38 ) , 00% < 5 3 , Z2% ! P 
UT SPR I TE 2 , < 200 , 1 07 ) , 1 5 , Z2%+ 1 
1920 LOCATE 1 O , 1 ! PRIMT" MARCADOR" 
1930 LOCATE 3,9:PRINT "ROJO. 
MI *C0> l M2%< O >¡ M3*< O) 



1940 LOCATE 3,11 : PRINT "AZUL. . . . : " 

;M1%(1 );M2%(1 >;M3#C1 ) 

1 950 LOCATE 3 ,13: PR I NT " AMAR I LLO ¡ " 

J MI % X 4 3 ) M2% ( 4 3 ; H3% C 4 3 

1960 LOCATE 3,15¡PRINT "VERDE . . . :" 

; M 1 % ( 6 3 ; M2% <: 6 3 ; M3% ( 6 ) 

1 970 LOCATE 3 ,17: PRIMT "BLANCO . . ! " 

; M 1 % (. 8 3 ; M2% C 8 3 ) 1*138 C 8 3 

1980 LOCATE 5 , 20 : PR INT" ¿OTRO JUEGO 

? CS/N3" : A*=INKEY*¡ IF A*="S" OR A* 

= "s" THEN 1370 

1390 IF A*<>"N" AND A*<>"n" THEN 1 

2000 S CREEN O ! END 
2010 ' ENCUADRE 

2020 LOCATE 6, 0 5 PRIMT'? | 

j k ; 

2030 PRINT" | " : LOCATE 30, 1 ¡ PRIMT" I " 
; : PRINT" h 



2040 FOR I*»3 TO 21 : LOCATE O , I%\ PR 
INT" I " : LOCATE 30 , 1%¡ PRINT" ¡ " ; ! NEXT 
2050 PRINT" ■ 



2060 RETURIM 



Test 
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¿Y POR QUE NO 
EN LOGO? 



Es agradable escribir unas lí- 
neas con el propósito de 
mostrar algunas de las virtu- 
des del LOGO, sobre todo 
para aquéllos que sólo cono- 
cen uno de sus aspectos más 
difundidos: LA TORTUGA 
y sus gráficos. 



Recientemente en esta misma re- 
vista leí un artículo que presen- 
taba el LOGO a los usuarios de 
MSX y que, cómo no, los ejemplos uti- 
lizados eran procedimientos (léase pro- 
gramas si se quiere) con las primitivas 

aue desplazan a la tortuga para realizar 
ibujos. Por ello he pensado que sería 
bueno ilustrar algunos otros aspectos 
de este lenguaje y de sus usos. 
Recordemos que un lenguaje no es otra 
cosa que un programa que se diseña se- 
gún ciertas características y para reali- 
zar determinadas tareas con el ordena- 
dor, y que por lo tanto será bueno si es 
eficiente desde el punto de vista con el 
que se ha construido. 
El LOGO deriva como lenguaje del 
LISP (List Procesing), lenguaje éste 
utilizado en las investigaciones de In- 
teligencia Artificial: es decir, en el in- 
tento de profundizar el conocimiento 
sobre el razonamiento humano crean- 
do con el ordenador pautas similares a 
las de éste, para conocerlo mejor. Por 
otro lado, su creador, Seymour Papert, 
matemático y discípulo de Piaget, 
enuncia la posibilidad de contar con un 
lenguaje que permitiera el desarrollo 
del conocimiento de una manera cons- 
tructiva y sobre la base del descubri- 
miento. Es así como se perfila el desa- 
rrollo del LOGO como lenguaje apto 
para la educación. 

Estos elementos que configuran las ra- 
zones y la filosofía de su diseño hacen 
del LOGO un lenguaje eficiente para 
manipular gráficos y para tratar pala- 
bras encadenadas en listas. 
Tengamos en cuenta que un conjunto 
de palabras con un cierto orden expre- 
san cosas con sentido, es decir ideas, y 
el razonamiento humano está basado 
en el tratamiento de ideas. 
Por todo esto es muy importante que 
ese conjunto de comandos y operacio- 
nes que se pueden realizar ni bien car- 
gamos el lenguaje en la memoria del 
ordenador, sean también palabras con 
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sentido en el lenguaje natural del usua- 
rio. Por suerte, muy recientemente se 
ha publicado la primera lista homolo- 
gada de las primitivas LOGO en caste- 
llano, por el Ministerio de Educación. 
Esperamos que a partir de ahora todos 
los que escriban sobre el LOGO sean 
consecuentes con sus propósitos y de- 
jen de utilizar las palabras en inglés y 
usen las castellanas. 
Pero, ¿qué son en LOGO Comandos y 
qué son Operaciones? 
Lo mejor es usar ejemplos: 
BORRAPANTALLA es un comando, 
BAJALAPIZ y OCULTATORTU- 
GA, también son comandos; mientras 
SUMA, PONPRIMERO y FRASE 
son operaciones. 

En el primer caso basta escribir la pala- 
bra y pulsar el "RETURN" (ENTER 
en otros ordenadores o simplemente la 
tecla que ejecuta las instrucciones escri- 
tas) para que se produzca el resultado 
que deseamos. Mientras que si escribi- 
mos FRASE y pulsamos el "RE- 
TURN", inmediatamente obtendre- 
mos un mensaje por la pantalla. FAL- 



TAN DATOS PARA FRASE. Estos 
datos son entradas que deberemos dar 
para que se realice la operación y 
obtengamos el resultado. 
Por ejemplo si tecleamos: PESCRIBE 
FRASE [LA GALLINA] [ES BIZCA] 
obtendremos LA GALLINA ES BIZ- 
CA y el cursor estará esperándonos 
nuevamente para que volvamos a escri- 
bir nuestras instrucciones. Podemos 
ver como FRASE necesita dos entradas 
y éstas son los datos que deberemos 
poner si queremos que esta operación 
se realice sin errores. 
En LOGO tenemos distintos «objetos» 
con los que podemos trabajar. Un 
objeto LOGO puede ser una palabra y 
su sintaxis (es decir, la forma en que en 
el lenguaje se reconoce su cualidad) se- 
rá "GALLINA. Si escribiéramos "GA- 
LLINA y pulsáramos él "RETURN", 
obtendríamos otro mensaje de error: 
NO SE QUE DEBO HACER CON 
GALLINA. Un objeto LOGO sirve 
para «hacer» cosas. 

Pero si le dijéramos: ?ESCRIBE "GA- 
LLINA obtendríamos 
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GALLINA 

? 

Ahora la instrucción ESCRIBE le ha 
dado un sentido a este objeto y lo ha 
escrito en la pantalla. 
Otro objeto muy usado en LOGO es 
un conjunto de palabras a las que lla- 
mamos lista. Su sintaxis es la siguiente 
[LA GALLINA ES BIZCA] ó [ES- 
TOY HECHO UN LIO], es decir, 
utilizamos los corchetes para agrupar 
un conjunto de objetos en una lista. 
Pero, qué pasaría si no utilizamos ni las 
comillas ni los corchetes y le pedimos: 
PESCRIBE GALLINA. Nuevamente 
obtendríamos un mensaje de error: 
NO SE COMO HACER GALLINA. 
Cuando no usamos las comillas ni los 
corchetes el LOGO mira (permítaseme 
utilizar este eufemismo) si GALLINA 
es una primitiva (comando u operación 
del lenguaje), o si es un procedimiento 
(palabra nueva que le hemos enseñado), 
si no es así es lógico que nos diga que 
no sabe cómo hacerlo. 
Hemos llegado ahora a una de las vir- 
tudes más interesantes del LOGO. La 
posibilidad de construir nuevas pala- 
bras a partir de las ya existentes. Po- 
dríamos decir que un procedimiento no 
es otra cosa que una secuencia de ins- 
trucciones que realizará el ordenador y 
que definimos con un nombre. 
Hagamos uno. Para hacerlo utilizare- 
mos la primitiva PARA y la primitiva 
FIN. 

PARA AVES 

ESCRIBE [GALLINA PATO GO- 
LONDRINA LORO] 
FIN 

Ahora una vez pulsado el "RETURN" 
y la tecla "ESC obtendremos un nue- 
vo mensaje. 

ACABAS DE DEFINIR AVES. 
Cuando escriba AVES y pulse "RE- 
TURN" obtendremos en la pantalla 
GALLINA PATO GOLONDRINA 
LORO y el cursor volverá a esperarnos 
para una próxima instrucción. 
Si escribiera ?ESCRIBE "AVES ¿Qué 
pasaría? !Muy bien! Esta vez hubiéra- 
mos obtenido la palabra AVES en la 
pantalla porque las comillas identifica- 
ban a este objeto como una palabra y 
no como el nombre del procedimiento 
que antes definimos. 
De este modo y para resumir; las ope- 
raciones no sólo requieren datos sino 
que éstos deben ser aquellos objetos 
adecuados para evitar el error. 
Otro ejemplo: PONPRIMERO [LA 
GALLINA ES] BIZCA ¡otro fallo! 
PONPRIMERO requiere como pri- 
mer dato un objeto, pero como segun- 
do dato este objeto debe ser una lista y 
no una palabra como en este caso. Si 
tenemos en cuenta estas cosas podemos 
utilizar las primitivas y hacer procedi- 



mientos que sean realmente interesan- 
tes. 

Pero vayamos ahora a construir un 
conjunto de procedimientos que ten- 
gan cara y ojos para poder apreciar al- 
gunas otras cuestiones del LOGO. El 
proyecto es hacer un sencillo dicciona- 
rio universal, es decir un diccionario 
con el que podamos agregar palabras y 
definiciones. Podremos listar su conte- 
nido y buscar alguna palabra para ver 
su definición. Este diccionario no pre- 
tende más que ilustrar la manera en que 
se programa en LOGO y puede ser 
francamente mejorado, cosa a la que os 
animo. 

PARA DICCIONARIO 
BORRATEXTO 

ESCRIBE [¿QUIERES AGRE- 
GAR, LISTAR O BUSCAR PA- 
LABRAS?] 

ESCRIBE [PARA ACABAR PUL- 
SA LA "F"] 

HAZ "TECLA LEECARACTER 
SI :TECLA = "A [AGREGAR] 
SI :TECLA = "L [LISTAR DIS- 
TADO] 

SI :TECLA = "B [BUSCAR DIS- 
TADO] 

SI :TECLA = "F [ALTO] 

DICCIONARIO 

FIN 



PARA AGREGAR 
BORRATEXTO 

ESCRIBE [ESCRIBE LA PALA- 
BRA Y SU DEFINICION. PARA 
VOLVER AL MENU ESCRIBE 
"MENU Y PULSA "RETURN"] 
HAZ "CONTROL LEELISTA 
SI ¡CONTROL = [MENU] 
[ALTO] 

HAZ "LISTADO PONULTIMO 
:CONTROL :LISTADO 
AGREGAR 
FIN 



PARA LISTAR :LISTADO 
BORRATEXTO 

SI :LISTADO = [ ] [ESPERA 100 
ALTO] 

ESCRIBE PRIMERO :LISTADO 
LISTAR MENOSPRIMERO DIS- 
TADO 
FIN 



PARA BUSCAR :LISTADO 
BORRATEXTO 

ESCRIBE [ESCRIBE LA PALA- 
BRA CUYA DEFINICION 
QUIERAS CONOCER] 
ESCRIBE [PARA VOLVER AL 
MENU ESCRIBE "MENU" Y 
PULSA "RETURN"] 
HAZ "PALABRA PRIMERO LE- 
ELISTA 

SI :PALABRA = "MENU [ALTO] 



BUSQUEDA :LISTADO 
BUSCAR :LISTADO 
FIN 

PARA BUSQUEDA :LISTADO 
SI VACIO? :LISTADO [ESCRI- 
BE [ESTA PALABRA NO ESTA 
DEFINIDA] ESPERA 50 ALTO] 
SI IGUALES? :PALABRA PRI- 
MERO PRIMERO :LISTADO 
[ESCRIBE MENOS PRIMERO 
:LISTADO ESPERA 50 ALTO] 
BUSQUEDA MENOSPRIMERO 
:LISTADO 
FIN 

PARA INICIO 
HAZ "LISTADO [ ] 
FIN 

En este conjunto de procedimientos 
hay una serie de cosas interesantes. 
La posibilidad de esperar la interven- 
ción del usuario, más conocida en BA- 
SIC como 1NPUT, para realizar ciertas 
acciones. En el procedimiento DIC- 
CIONARIO, guardamos el carácter 
leído en la variable de nombre "TE- 
CLA, para, una vez comparado su con- 
tenido en el condicional, llamar al pro- 
cedimiento que nos interesa. En este 
caso utilizamos la primitiva LEECA- 
RACTER, pero en AGREGAR, la en- 
trada desde el teclado no es un carácter 
sino una lista, es decir cualquier cosa 
que escribamos hasta pulsar el "RE- 
TURN" entrará en la variable de nom- 
bre "CONTROL como una lista, por 
ello es que el condicional compara lo 
que hay en "CONTROL con [ME- 
NU], la lista y no "MENU la palabra. 
Si queremos que sea la palabra, fijémo- 
nos en el procedimiento BUSCAR; lo 
que guardamos en "PALABRA es el 
PRIMERO de LEELISTA. ¿Cuál es el 
primer elemento de la lista [MENU]? 
Pues, sí, la palabra "MENU. 
Pero miremos un poco más de cerca las 
variables. La primitiva que las define es 
HAZ y su sintaxis HAZ (que el nom- 
bre) "NOMBRE tenga el siguiente 
contenido. HAZ "nombre objeto. El 
contenido de una variable puede ser un 
número, una palabra, una lista, el resul- 
tado de operaciones LOGO, otra va- 
riable, en fin, miremos en el procedi- 
miento AGREGAR el contenido de la 
variable "LISTADO: una operación 
que pone en último lugar lo que hay en 
la variable "CONTROL; en la misma 
variable que estamos definiendo. Por 
esto es que en INICIO lo que hacemos 
es darle como contenido a listado: una 
lista vacía. Aquí iremos guardando en 
AGREGAR las listas que introduzca el 
usuario; iremos escribiendo el conteni- 
do de nuestro diccionario. Nótese que 
cuando queremos decir el contenido de 
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MSX por dentro 





la variable, utilizamos los dos puntos 
por delante del nombre :LISTADO, 
esta es su sintaxis. 

Imaginemos que el contenido de nues- 
tro diccionario de momento es: [[GA- 
LLINA HEN] [PATO DUCK] [PE- 
RRO DOG]] un grupo de listas donde 
el primer elemento de esa lista es una 
palabra castellana y el segundo su equi- 
valente en inglés. Si lo quisiera listar lo 
pondría como argumento en el proce- 
dimiento LISTAR. Recordemos que 
dice LISTAR :LISTADO. Si simple- 
mente escribiera LISTAR y pulsara 
"RETURN" ocurriría el error FAN- 



TAN DATOS... ¿Cuáles?, el conteni- 
do de la variable. Sigamos con este pro- 
cedimiento. Entro :LISTADO como 
dato. Primera línea, borra el texto, se- 
gunda línea, comprueba que "listado 
no sea una lista vacía, si lo fuera espera- 
ría un tiempo y se detendría el procedi- 
miento. Luego nos escribe en la panta- 
lla el primer elemento de listado -en 
este caso gallina hen- y vuelve a empe- 
zar, pero restando (MENOSPRIME- 
RO) el primer elemento a listado. 
Interesante ¿No? 

Bien, os toca a vosotros descubrir có- 
mo funciona BUSCAR, pero con lo di- 



cho tenéis pistas suficientes. Espero 
que por lo menos esta visión de que el 
LOGO es un lenguaje sencillo pero al 
mismo tiempo potente os anime a co- 
nocerlo mejor. Si así fuera este corto 
artículo hubiera cumplido su cometido 
sobradamente. 

Miguel Figini Michelagnoli 
Director del Centro LOGO 

Centro LOGO de Barcelona 

C./ Entenza 218, D 5.° - 08029-BAR- 

CELONA 

Telf. 322 26 14 



COMPLETA TU HEMER OTECA DE PROGRAMAS!! 






N.° 1 - 150 PTAS. N.-2-150PTAS. N.°* 3 y 4 - 300 PTAS. N.« 5 - 150 PTAS. N.« 6 - 1 50 PTAS. N.° 7-150 PTAS. 



¡SI TE HACE FALTA ALGUN NUMERO 
PIDELO HOY MISMO! 




BOOGABOO 

. 1 Z J 

LOCO UN LENCUAJE DlOACTlC 




N.» 8 - 1 50 PTAS. N." 9 y 1 0 - 300 PTAS. 



Para contar con la más completa colección de programas de MSX sólo tienes que recortar 
o fotocopiar el cupón \^f^^\^^^^^¡^ CLUB DE proc^Smas 

•- BOLETIN DE PEDIDO 

Sí, deseo recibir hoy mismo los números de MSX CLUB DE PROGRAMAS, libre de 

gastos de envío, por lo que adjunto talón n.° del Banco/Caja 

por el importe de ptas. a nombre de MANHATTAN TRANSFER, S.A. 

NOMBRE Y APELLIDOS 
CALLE 




I 



REGALATE EN ESTAS FIESTAS UN LIBRO 
VITAL PARA EL USUARIO DE MSX 



UN LIBRO PENSADO 
PARA TODOS LOS QUE 
QUIEREN INICIARSE 
DE VERDAD EN LA 
PROGRAMACION BASIC 

Construcción de programas. El po- 
tente editor todo pantalla. Constan- 
tes numéricas. Series, tablas y ca- 
denas. Grabación de programas. 
Gestión de archivo y grabación de 
datos. Tratamiento de errores. Los 
gráficos del MSX. Los sonidos del 
MSX. Las interrupciones. Introduc- 
ción al lenguaje máquina. 




Y ADEMAS PROGRAMAS 
DE EJEMPLO 

Alfabético. Canon a tres voces. 
Moon Germs. Bossa Nova. Blue 
Bossa. La Séptima de Beethoven. 
La Flauta Mágica de Mozart. Scrap- 
ple from the apple & Donna Lee. The 
entretainer. Teclee un número. Ca- 
lendario perpetuo. Modificación Ta- 
bla de colores SCREEN 1. Rectán- 
gulos en 3-D. Juego de caracteres 
alfabéticos en todos los modos. Jue- 
go Matemático. Más grande más pe- 
queño. Póker. Breackout. Apocalyp- 
se Now. El robot saltarín. El archivo 
en casa. 



1 Deseo me envíen el libro Los secretos del MSX, para lo cual adjunto talón de 1 .500 ptas. a la orden de 
1 MANHATTAN TRANSFER, S.A. 

Nombre y apellidos 

Calle n.° Ciudad CP 

i Este boletín me da derecho a recibir los secretos MSX en mi domicilio libre de gastos de envío o 

cualquier otro cargo. 

Importante: Indicar en el sobre MANHATTAN TRANSFER, S.A. 
i «LOS SECRETOS DEL MSX» 

i Roca i Batlle, 10-12 Bajos-08023 BARCELONA 



SORPRENDE A UN AMIGO FELICITANDOLE ESTAS FIESTAS CON 




Deseo remitan LOS SECRETOS DEL MSX a 



Nombre y apellidos 

Calle N.° Ciudad CP 

De parte de 

Nombre y apellidos 

Para lo cual adjunto talón del Banco/Caja. N.° de 1 .500 - ptas. 

Dicho libro sera remitido por correo certificado incluyendo una felicitación personalizada del 
remitente. 

Remitir el talón a nombre de: 

MANHATTAN TRANSFER, S.A. Roca I Batlle, 10-12 bajos - 08023 Barcelona 



17 



Monitor al día 



MICRO-GUIA 

El Centre Divulgador de la In- 
formática de la Generalitat de 
Catalunya presentó el pasado 
día 19 de Diciembre el libro "MICRO- 
GUIA" Guia del usuari de petits ordi- 
nadors en. la sede de la Asociació de la 
Prensa de Barcelona. 
Esta útil iniciativa de la Generalitat de 
Catalunya nos presenta un auténtico 
"Hit parade" de los diversos ordenado- 
res y programas formativos disponibles 
en el mercado. 

Además incluye un volante preparado 
junto con la Taula Consumerista de 
Catalunya que agrupa a todas las orga- 
nizaciones de defensa de los consumi- 
dores. 

Felicitamos al Centre Divulgador de la 
Informática por esta Guía — la primera 
de España de estas características — y a 
aquellos que deseen comprarse un 
ordenador en estas Navidades, puesto 
que encontrarán en la "MICRO- 
GUIA" la información adecuada. 




KING'S VALLEY 



El desafío egipcio 



Una de las novedades que pre- 
senta Serma S.A. es su cartu- 
cho Konami «King's Valley» o 
lo que es lo mismo «El valle de los re- 
yes» que propone una misteriosa aven- 
tura por los intrincados pasillos de las 
pirámides, plagados de trampas y teso- 
ros ocultos. Eljuego supone un singu- 
lar entretenimiento por la variedad de 
sorpresas que esperan al jugador a la 
vuelta de cada recodo, escalera o nivel 
en el interior de la tumba del faraón. Su 
precio aproximado es de 5.300 pts. 



MITSUBISHI LANZA NUEVOS 
APARATOS PARA EL 86 
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a prestigiosa firma MITSUBIS- 
HI inicia este año presentando 
dos nuevos ordenadores y varios 
periféricos. Los ordenadores son: 
ML-FX1- Se trata de un ordenador de 
atractivo diseño con las características 
habituales de estos equipos en el mer- 
cado (64 K RAM + 16 VRAM), que 
ofrece como novedad la inclusión de un 
teclado numérico de gran utilidad en 
las aplicaciones profesionales. 
ML-FX2.- Este ordenador tiene las 
mismas características técnicas del 
anteriormente descrito, pero incorpora 
además un programa en ROM (32 K) 
de aplicación. Se trata del MAP (Mitsu- 
bishi Applied Program). Se compone 
de un paquete de 5 programas integra- 
dos dentro de la línea del software más 
profesional. Este paquete incluye: 
-Base de Datos 
-Hoja electrónica 
-Proceso de textos 
-Gráficos y comunicaciones. 
Este paquete de software permite tra- 
bajar con archivos en la unidad de dis- 
co. Además, el MAP también ha sido 
diseñado en cartucho, con lo que los 
actuales usuarios de MSX también po- 
drán disfrutar de sus ventajas: Puesto 
que todos los programas del paquete 
pueden compartir su información entre 
ellos se pueden obtener gráficos de ba- 
rras o de pastel a partir de los datos de 
la hoja electrónica, entrar los datos en 
la hoja a partir de la base de datos... 
Entre los periféricos cabe citar la uni- 
dad de diskette de 3,5 pulgadas 
ML-03 FD que tiene una capacidad de 




1 Mb (un Megabyte) sin formatear y 
720 K formateados, 8 difrentes forma- 
tos de grabación, y sistemas operativos 
CP/M y MSX-DOS. 
También se alegrarán los usuarios de 
MSX al saber que entre los nuevos pe- 
riféricos de Mitsubishi está el ratón 
gráfico ML-10MA, que conectado al 
port de joystick y con ayuda del pro- 
grama en cinta que se suministra junto 
a él, permitirá crear gráficos con suma 
facilidad. Además, puede utilizarse co- 
mo joystick. 

Además de todo esto, Mitsubishi tam- 
bién lanza una lectograbadora de cas- 
sette y un joystick anatómico. 
Realmente han empezado el año arro- 
llando estos de Mitsubishi! 




BRIAN JACKS SUPERSTAR 

El héroe deportivo 

Zafiro Software División -P.° de la 
Castellana 141 - 28046 Madrid- 
ha entrado en el sistema MSX 
con un interesante juego deportivo. 
Nos referimos al Brian Jacks Superstar, 
un judoka campeón y estrella de la tele- 
visión norteamericana, que ha dado 
origen a un juego en el que los jugado- 
res deben competir con él en distintas 
disciplinas deportivas: paralelas, flexio- 
nes, canoa, ciclismo, fútbol, natación, 
arco y 100 metros lisos. Es un juego 
que se presenta muy entretenido y va- 
riado sin necesidad de matar marciani- 
tos. 



Instructor Mecanografíe© * 
incluyendo lecciones, 
ejercicios y juegos 



Mea 




IDEA TYPE 



Instructor mecanografico 



« 



I 



dea Type» es un programa que 
consiste en un instructor me- 
canografico, que incluye lec- 



ciones, ejercicios y juegos destinados a 
dar más práctica a los futuros mecanó- 
grafos. El programa empieza con la 
identificación de las teclas de una má- 
quina de escribir y una serie de conse- 
jos útiles y pasa posteriormente a una 
serie de lecciones cuya dificultad se 
presenta de menor a mayor. «Idea Ty- 
pe» consta de doce lecciones, al térmi- 
no de cada una de las cuales se da una 
estadística del ejercicio a fin de que el 
alumno pueda evaluar su progreso. Es- 
ta versión para MSX ha sido desarrolla- 
da por Idealogic S.A. Valencia, 85 - 
08029 Barcelona. 



:YES PHILIPS PC 



El PC compatible con el 
MSX-DOS 



L 



a compañía Philips comercializa 
entre su gama de productos in- 
formáticos de mayor potencia 




un ordenador personal que trabaja tan- 
to con el sistema operativo MS-DOS 
como con el MSX-DOS, según in- 
forma en un detallado artículo nuestra 
colega holandesa MSX-INFO. El :YES 
PHILIPS PC es un aparato de gran po- 
tencia destinado a usos muy determi- 
nados dentro del sector empresarial e 
industrial. 




TALENT DPC-200 

El MSX argentino 

Como va anticipábamos en nues- 
tro numero anterior el MSX ya 
se comercializa en Argentina. 
La firma Telemática S.A. ha iniciado la 
fabricación del aparato DPC-200 con 
Licencia de la firma coreana Daewoo. El 
MSX argentino lleva el nombre de Ta- 
lent y mantiene las mismas pautas de 
diseño v calidad del aparato original. 



La presentación del DPC-200 Talent 
constituyó un extraordinario éxito, lo 
que ha motivado a la compañía Tele- 
mática a incrementar su ritmo de pro- 
ducción que hasta el momento es de 
5.000 aparatos al mes. 
Para instruir al usuario, tanto en el uso 
v manipulación del aparato, como en el 
MSX BASIC, Telemática S.A. ha edita- 
do un «Manual de uso y MSX Basie 
muy completo y didáctico. Es de seña- 
lar que las instrucciones del uso del Ta- 
lent tanto como las del lenguaje MSX 
Basic van acompañadas de gráficos ex- 
plicativos y de pequeños programas. 



fjTt PROGRAMA A 



BASES 

1. °- Podrán participar todos nuestros lectores 
cualquiera sea su edad. 

2. °- Los programas se clasificarán en tres cate- 
gorías: 

Educativos 
Gestión 

Entretenimiento 

3. °— Los programas deberán ser remitidos gra- 
bados en cassette debidamente protegidas, den- 
tro de su estuche de plástico. 

4. °- No entrarán en concurso aquellos progra- 
mas que ya hayan sido publicados por otros 

o plagiados. 

Junto a los programas se incluirán las ins- 
>nes correspondientes, detalle de.las varia- 
bles, ampliaciones posibles y todos aquellos co- 
mentarios que el autor considere de interés. 

Todos los programas han de estar es truc- 
os de modo claro, separando con REM los 
sectores del mismo. 



PREMIOS 

7. °- MSX CLUB OTORGARA LOS SI 
> PREMIOS: 

: DE ORO MSX CLUB Y UNA 
DAD DE DISCO AL MEJOR PROGRA- 
i DEL AÑO 

Además mensualmente se premiarán los pro- 
gramas publicados del siguiente modo: 
10.000 pts. los programas Educativos 
10.000 pts. los programas de Gestión 
6.000 pts. los programas de Entretenimiento 

8. °- MSX CLUB DE PROGRAMAS se reser- 
va el derecho de publicar fuera de concurso 
aquellos programas de reducidas dimensiones 
que sean de interés, premiando a sus autores. 



FALLO Y JURADO 

9.°- El Departamento de Programación de 
MSX CLUB DE PROGRAMAS hará la primera 
selección de la que saldrán los programas publi- 
cados en cada número de la revista. 
10 o - Los programas no se devolverán salvo que 
así lo requiera el autor. 

1 1. °- La elección del PROGRAMA DEL AÑO 
se hará por votación de nuestros lectores a través 
de un boletín que se publicará en el mes de octu- 
bre de 1986. 

12. °- El plazo de entrega de los programas finali- 
zará el 31 de octubre de 1986. 

13. °- El fallo se hará conocer en el número de di- 
ciembre de 1986, entregándose los premios en el 

mes. 



PA CREANDO TUS PROGRAi 

SX CLUB SELECCIONARA Y PUBLICAR 
AQUELLOS QUE ESTEN MEJOR 
DISEÑADOS Y ESTRUCTURADOS 
PARA QUE NUESTROS 
LE 




mismo mes. 






= = — 




Remitir a: 


LLUO Ut ¡~ k'uoi\n!'l¡i-< 

Roca i Batí 1c 


| MI PROGRAMA 

, 10-12, bajos 08023 Barcelona 
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Programa 



iPor Luis Alfonso Ureñai 



CODIFICADOR DE 
RESISTENCIA 



Magnífico programa que 
permite calcular el valor 
óhmico de resistencias que 
tengan código de colores. Su 
empleo es sencillo y consiste 
en introducir los colores. El 

Erograma da su valor y tam- 
ién una representación grá- 
fica de la resistencia. 



-,o> - - 




Programa 



4ie ir niotfp». I. 




ir ccpscrniotcp». 



] O ' = = = = = === = = =: = = = =:=: = =r = = = = =s = 

20 ' 

30 ' CODIFICADOR RESISTENCIAS 
40 ' 

50 1 ESCRITO POR: 

60 ' 

70 'LUIS ALFONSO UREftA LOPEZ 
80 ' 

90 ' TÜRREDONJIMENO 1.985 
100 ' 

110 ' PARA MSX-CLUB 

1 "20 1 = = = = ==== = == = ==== = = =:==:.•=:============ = == 

1 30 COLOR 1,15,15 

140 SCREEN 2 

150 KEY OFF 

160 OPEN "GRP: m AS#1 

1 SO ' 

190 ' INSTRUCCIONES 
200 ' 

220 PSET < 20, 10) , 15:PRINT#1 , "DECODIFI 

CADOR RESISTENCIAS" 

230 PSET (20, 20) ( 15:PRINT#1 , 



240 PSETÍ 20 , 40 ) ,15! PR INT#1 , '* Es te p r o 
grama per m i te cale u~" 

250 PSETC20 f 55), 15:PRINT#1 ,"lar el v 
alor Qhmico de re-" 

260 PSET ( 20 , 70 ) , 1 5 ¡ PR I NTtt 1 , " s i s tenc i 
as que posean código" 

270 FSET<20 # 85>,15:PRINT#1 , "de color 
es. M 

2S0 PSET < 20 , 1 00 > ,15: PR I NT# 1 , " Para e 1 
lo es necesario in~" 

290 PSET (20; 115), 15:PRINT#1 ,"troduci 

r los colores, obte~" 

300 PSET ( 20 , 1 30 ) , 1 5 I PR I NT# %,''ni endoS 

además de su valor" 
310 PSET (20, 145) , 15:PRIIMT#1 , "una si 
mi lar representac i 6n" 

320 PSET ( 20 , 1 60 ) ,15: PR I NT# 1 , " de 1 a m 
i sma . " 

330 PSET ( 55 , 1 80 3 , 1 5 ! PR I NT# 1 , " * PULSA 

UNA TECLA » w 
340 A*=INKEY*:IF A*="" THEN 340 

360 1 

370 ' REFLEJO CONSTANTES 
380 ' 

400 BEEP : BEEP 

4 1 0 DATA NEGRO , MARRON , ROJO , NARANJA , A 
MAR I LLO , VERDE , AZUL , V í OLETA , GR I S , BLAN 
CO 

420 READ Al$, A2$, A3*>, A4$, A5$, AS*, A7$ 

430 DATA NEGRO , MARRON , ROJO , NARANJA ( A 
MAR I LLO , VERDE , AZUL , ORO , PLATA 
440 READ B 1 $ , B2* , B3* , B4* , BS* , B6* , B7* 
, B8$ , 69$ 

450 DATA MARRON, ROJO, ORO, PLATA 

460 READ C1*,C2$,C3$,C4$ 

470 CLS : COLOR 1,15,1 5 ! SCREEN 1 ! KEY 0 



FF:CL0SE#1 

480 CLS : COLOR 1,15,15 
490 SCREEN 1 ¡ KEY OFF 

500 LOCATE 1 , 1 : PRINT"CODIFICADOR DE 
RESISTENCIAS" 
510 LOCATE 1 ,2:PRINT"= 



520 LOCATE 6 , 6 ! PRI NT" INTRODUCE DATOS 

530 LOCATE 6,7:PRINT" 

540 BEEP: BEEP 

550 LOCATE 1 ,10: INPUT" ¿ 1 2 COLOR SIGN 

" ; A$ 
560 BEEP: BEEP 

570 LOCATE 1 , 1 3 ! INPUT" ¿22 COLOR SIGN 
. " ; B% : BEEP : BEEP 

530 LOCATE 1 , 1 6 ¡ INPUT" ¿MULTIPLICADOR 
. " ¡ D* ¡ BEEP : BEEP 

590 LOCATE 1,19: INPUT" ¿TOLERANCIA . , . 
. " ; E* : BEEP : BEEP 

600 ' = ======= ==== =======: = = = 

610 ' 



620 
630 
640 
650 
660 
670 
680 
690 
700 
710 
720 
730 
740 
750 

OR 
=A7* 
GOTO 
760 
770 
780 
790 
800 
810 
820 
830 
840 
850 
860 
870 

OR 
=A7$ 
GOTO 
880 
830 
900 
910 
920 
930 
940 
950 
960 



OPERACIONES LOGICAS 



IF A$=" NEGRO "THENS=0 ! K%=1 
IF A*=A2* THEN S=l:K%=8 
IF A*=A3* THEN S=2 : K%=8 
IF A*=A4* THEN S=3 ¡ K%=9 
IF A$=A5$ THEN S=4:K%=11 
IF A«=A6$ THEN S*SíK**3 
IF A$=A7$ THEN 3~G ! K%=4 
IF A*=A8* THEN S«7lK*«l3 
IF A*=A9$ THEN S=8:K%=14 
IF A*=A10* THEN S=9:K«=15 
IF A*=" NEGRO "OR A*=A2$ OR A*=A3$ 
A*=A4* OR A$=A5$ OR A$=A6$ OR A$ 
OR A*=A8* OR A*=A9* OR A*=A10* 
770 
GOTO 550 

IF B$=A2$ THEN R=l 
IF B$=A3$ THEN R*2 l j%«8 
IF B*=A4* THEN R=3 : J%=9 
IF B*=A5* THEN R»4¡ J%*11 
IF B*=A6* THEN R=5 : J%=3 
IF B*=A7* THEN R«6 : J%=4 
IF B*=A8* THEN R=7;J%=13 
IF B*=A9* THEN R=8 ! J%= I 4 
IF B*=A10* THEN R=9;J%=15 
IF B$=" NEGRO "THEN R=0¡J%=1 
IF B*=" NEGRO" OR B*=A2* OR B#*A3* 
B*=A4* ÜR B*=A5* OR B*=A6* OR B* 
OR B*=A8* OR B$=A9$ OR B$=A10* 
890 
GOTO 570 

IF D**B2$ THEN U*=" 1 Ofi" ¡ M%=8 
IF D*=B3* THEN Ü*« M TO0S* lM%**8 
IF D*=B4* THEN U*=" 1 Kft" : M%=9 
IF D*=B5* THEN U$=" 1 OKft" ¡ M%=1 1 
IF D*=B6* THEN U$=" 1 OOKfí" ! M%=3 
IF D*=B7* THEN U*«"lMft M ¡M%**4 
IF D*=B8$ THEN U$="0 . 1 St N : M%=1 O 
IF D*=B9* THEN U*="0 . 01 ft* \ M%=1 4 
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970 IF D*="NEGRü"THENU*="Kí" :M%=1 
980 IF D*=" NEGRO "ÜR D*=B2$ GR D*=B3$ 
OR D*=B4* ÜR b***B5* ÜR D*=BS* OR D* 
-B7$ OR D*=B8* ÜR D*=B9* OR D*=B10* 
GOTO 1000 
990 GOTO 530 

1000 IF É*»C1« THEN Sfé* n ±\ %» \ H»Ú 
1010 IF E*=C2* THEN V$=" ±2%" ! N=l 
1020 IF E*«*C3* THEN V$="±5%" ¡ N=l O 
1030 IF E$=C4* THEN V*="±l 0%" : N=l 4 
1040 IF E*=C1*0R Éé*C2* OR E*=C3* OR 
E**C4* GOTO 1060 
1050 GOTO 590 
1060 SCREEN 2 

1 070 OREN" GRP ¡ " AS# 1 ! PSET < 70 , 1 30 ) ! PR 
INT#1,"LA RESISTENCIA" 

1 080 PSET ( 95 , 1 50 ) ! PR I NT# 1 , " EN OHM I OS 
IQ90 BEEP : BEEP 

1100 PSET C 60 , 1 70 ) , 1 5 ! PR I NT #1,"R<ft>* 
" : BEEP : BEEP 

1110 PSET ( 95 , 170 ) ,15: PR I NT «1/3: BEEP 
: BEEP 

1 1 20 PSET C 1 05 , 1 70 ) ,15: PR I NT# 1 . R ! BEEP 
: BEEP 

1130 PSETC127, 170), 15 SPRINT #1,"X";B 
EEP : BEEP 

1140 PSET C 1 40 , 1 70 ) , 1 5 : PR I NT # 1 , U* ! BE 
EP : BEEP 

1150 PSET USO, 170), 15:PRINT #1,V*:BE 
EP : BEEP 

1 1 70 ' 

USO ' DISEÑO RESISTENCIA 

1 1 90 ' 

1 200 ! ~ = r==r=:==:» = ~ = ™=:=r:r:=: = 

1210 PSET (85, 1 í :PRINT#1 ,"C O D I G O 
M : BEEP : BEEP 

1220 PSET< 50 . 20 ) ! PRIMT#1 , "R E S I S 



TÉ N C I A" : BEEP: BEEP 

1230 PSET (50 ,20) ¡PRINT#1 , "R E S I S 

T E N C I A" 

1 240 C I RCLE ( 80 , 70 ) , 20 ,6,1. 5707 , 3 .141 
5 ,1.4 

1 250 L I NE ( 80 , 50 ) - £ 1 80 , 50 ) , 6 

1 260 C I RCLE ( 1 80 ,70), 20 ,6,6. 283 1 35293 

#, 1 . 5707, 1 . 4 

1 270 C I RCLE ( 80 , 80 ) , 20 ,6.3.141 5926465 

#,4. 738896975#, 1.4 

1 280 L I NE ( 80 , 1 00 ) - ( 1 80 , 1 00 ) , 6 

1 290 C I RCLE ( 1 80 , 80 ) , 20 , 6 , 4 . 7 1 238896* 

,0, 1 . 4 

1 300 PSET C 65 , 80 ) ¡ DRAW" C6U 1 O" 

1310 PSET ( 1 94 , 79 ) ¡ DRAW" C6U 1 O " 

1320 PAINT(8Ü,80> ,6 

1 330 L I NE ( 1 O , 70 ) - ( 65 , 78 ) , 1 4 , BF 

1 340 L I NE ( 1 95 , 79 ) - C 240 , 70 ) , 1 4 , BF 

1350 PAINT(80,80) ,6 

1 360 PSET ( 85 , 50 ) : DRAW" C4D50C4 99 

1370 BEEP 

1 380 L I NE ( 85 , 50 ) - ( 95 , 1 00 ) , K% , BF 
1 330 PSETC 95 , 50 ) ! DRAWCSD50C4" 
1 400 PSETC 110, 50 ) ! DRAWC6D50" 
1410 BEEP 

1 420 L I NE ( 1 1 0 , 50 >.-< 1 20 , 1 00 ) , J% , BF 
1 430 PSET ( 1 20 , 50 ) ! DRAW" CSD50" 
1 440 PSET ( 1 35 , 50 ) ¡ DRAW" C6D50" 
1450 BEEP 

1 460 L I NE ( 1 35 , 50 ) - ( 1 45 , 1 00 ) , M% , BF 
1 470 PSETC 1 45 , 50 ) ! DRAWC6D50" 
1 480 PSET C 1 60 , 50 ) ¡ DRAW" C6D50" 
1490 BEEP 

1 500 L I NE C 1 60 , 50 ) - ( 1 70 , 1 00 ) , N , BF 

1510 PSET C 1 70 , 50 ) ! DRAW" C6D50" 

1520 N*«INKEY* 

1530 IF N*="" THEN 1520 

1540 RUN 410 



Test de listado i 




Codificador de resistenci 




! 



40 

50 
60 
70 
80 
90 
00 
1 1 O 
I 20 
1 30 
! -10 
í 50 
1 SO 

1 70 
! 80 
190 
200 

2 I O 
220 

90f' 



- 58 

- 58 
F\Pí 

58 

• 58 

- 58 

- r .B 

53 
. gg 

• 99 
-216 

1 33 
224 

• 58 

- co 

o p 

- 58 

• 58 



240 


1 04 


470 


2 SO 
260 


... j 9/) 


480 


270 


rj 10 


490 
500 


280 


- 34 


5 1 0 


290 


.... o - y 


520 




-225 


530 


31 0 


— G 


540 


0 


- 1 66 


350 


330 


- 49 


560 


34 0 


-202 


570 


350 




580 


360 




590 


370 


c p 


600 


0 




610 


390 


— S 8 


620 


400 




630 


41 o 


- í 38 


640 


420 


- 67 


650 


430 


-200 


660 


440 


- *30 


670 


450 


-1 15 


680 



• 97 

- 60 
•200 

• 1 00 

• 167 
- 1 05 

1 06 

■ | 8G 

- 48 
- 1 86 

41 

• 1 26 

• 21 
58 

- 58 

• 58 
58 

■ 58 
118 

• 36 

o o 



700 
710 
720 
730 
740 
750 
760 
770 
730 
730 

y oo 

31 O 
320 
830 
84 O 
850 
360 



890 
900 
91 O 



• 92 
101 

■1 04" 
146 
1 19 
191 

• 85 

• 87 

• 90 



- 91 
- 1 00 

- 1 oé 

- \ 45 

- • 1 'i 7 



48 



330 
94 O 
950 

970 
980 
990 
000 
vi 

020 
030 
040 

oso 

070 
080 
0'90 
i 00 
I 1 o 
120 
1 30 
1 40 



-121 
• 23 

- 51 

1 04 ' 
•239 
1 32 

■Km y— I 

-2 I 7 

- 16 
-245 

-2'3 1 
-216 



186 
I 87 
3S 
• 44 
■ í 40 
■US 




1 1 60 

I 1 80 
I 1 90 
1 200 
1 2 1 O 
1 220 
I 230 
1 240 
I 250 
I 260 
I 270 
1 280 
f 290 
1 300 
1310 
1 320 
l 330 
1 340 
1 350 
1 360 
1 370 
330 



SQ 

• 58 

• 58 
-206 

• 65 

• 77 

- 1 30 

- 31 
- 1 56 
-230 
■243 
■ 83 
-21 7 

- 61 
- 1 79 

- 61 
- 1 33 

• I 92 
- 1 1 3 



1 390 
1 400 
1410 
1 420 
1 4 30 
1 440 
1 450 
1 460 
1 470 
1 480 
1 490 
1 500 
1 5 1 O 
1 520 
1 530 
1 540 



-195 

- 91 
- 1 92 
-162 

■ 1 0 1 
■116 
-192 
-2 1 5 

1 26 
-141 
•192 
-229 
- 1 51 

- 77 
13 

■ 51 



TOTAL : 
17740 
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Programa 



iPor Javier Benito i 



SATELITE 
ESPACIAL 



Un entretenido juego que 
consta de seis pantallas dife- 
rentes en las que el jugador 
tiene que poner mucha habi- 
lidad para superarlas. Cada 
pantalla es una misión con 
dificultades crecientes hasta 
que consigues llegar al lugar 
donde se encuentra la lanza- 
dera que te devolverá a la 
Tierra. 



10 ' SATELITE ESPACIAL 
20 ' PQR -JAVIER BENITO 
30 ' PARA MSX CLUB 

40 ' 

50 ' «PRESENTACION* 

60 ' i:******:****::*:*:*: 

70 SCREEN3 , 3 ! CLEAR2000 ! COLOR 15,1 

2,13; CLS : ÜPEN"GRP ! "FOROUTPUTASttl 

80 PRESET < 1 0 , 50 ) ! PR I NT# 1 , " SATEL I T 

E" 

90 PRESET C 10,1 00 ) ¡ PRI NT# 1 , " ESP AC I 
AL" 

1 00 X*=" V 1 ST 1 0004DEFGA2FG#2EGFDEF 
GA205DC#2" 

1 1 O PLAYX* 

1 20 I FPL A Y C 1 ) < > OTMEN 1 20 

1 30 COLOR 11,13,12: CLS ! PRESET ( 60 , 1 

03 :PRINT#1 , "P 0 R" 

1 40 PRESET C 40 , 60 ) ! PR I NT# 1 , " JAV I ER 

II 

1 50 PRESET ( 40 , 95 3 ¡ PR I NT# 1 , * BEN I TO 

n 

1 60 PRESET <: 30 , 1 50 ) ¡ PR I NT# 1 , " i A V I L 
A 3" 

1 70 Y$="04DEFGA2FG#2EGF205DC#C04B 
A#205C#D2 . " 
180 PLAYY$ 

1 90 I FPLAY C 1 ) < >OTMEN 1 90 

200 SCREENO ! KEYOFF ! COLOR 1 5 . 4 , 4 ! C 

LS 

210 pri nt "mal 

220 LOCATE 1 O ! PR I NT" I NSTRUCC I ONES" 
PRI NT" O 



240 PRI NT" El juego consta de se 
is misiones " 

250 PRI NT" $ En la primera deberá 
s atravesar " 

260 PRI NT" toda la pantalla esquiv- 
ando ios me- teoros." 
270 PRI NT" :*En la segunda y su ees 
ivas te ata-- carán tres naves en 
emigas.En la ter- cera, cuarta y 



320 
3:30 
340 



quinta las naves se- rán invisib 
les y solo las veras al dispara 
r . " 

280 PRI NT" * En la sexta y última 
tendrás que efectuar un acoplam 
iento en la lanza-dera que te lie 
vará a la Tierra." 
290 PRI NT" * Comenzarás el juego 
con tres as-- t roña ves. Si destruy 
es la nave enemigamorada te darán 
f ue 1 . " 

300 PRI NT" # Si llegas a los 20.0 
00 p t s . ( en 1 as rus i ones 2 , 3 ,4,5 3 
leí pantalla se pondrá de color a 
marillo y conseguirás otra nave. 

( Pu 1 sa una te c 1 a 3 " 
310 F$="" 

F*=INKEY$ 
IFF*=" "THEN320 

SCREEN2 , 2 ! COLOR 1 5 ,.4 , 4 ! CLS ! PR 
ESET C 30 , 1 00 3 ¡ PR I NT# 1 , " JUEGAS CON 
TECLADO CS/N 3" 
350 Nl*="" 
350 N1*=INKEY* 

370 I FN 1 tm» S" ORN 1 *=" s" THENZ-0 

380 IFN1 $="M"0RN1 *="n"THENZ=1 

390 I FN 1 *=" " THEN360 

400 W 1 *=" V 1 3T20004CF2G2AA#05C04A# 

A2GGF2 . CF2G2AA#05C04A#A2GGF2 . " 

4 1 0 W2$= " 0 5 C 0 4 A # A 2 A # A G 3 . 05C04A#A2 

A#AG3 . " 

A 20 W3$=" 05C04AFG2F2" 

430 VI V 1 2T20003FG2AA#04C03A#A2 

GGF2 . CF2G2AA#04C03A#A2GGF2 . " 

440 V2*="04C03AA#AG3. 04C03A#A2A#A 

G3 . " 

450 V3$=" 04C03FG2F2" 

460 PLAYW1*,V1* 

470 PLAYW2$,V2$ 

480 PLAYW3* , V3$ 

A 90 ' :*::*******:*::-.|i:+::t::t:*** 

500 ' ^PRIMERA MISION* 

51 0 ' ************^t!jjí* 

520 COLOR 15,1,1: CLS ! G0SU83530 ! CL 
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Programa 



S : G0SUB1 650 : NA=3 ! QOSUB1 870 ! X=300 J 

Y=0 I GOSUB 1 1 30 : GQSU81 340 

530 ' ***************** 

540 ' *SPRITES MOVILES* 

550 ' ***************** 

560 F 1 *=CHR* C &H3 3 +CHR* £ &H7 ) +CHR* £ 

&HF ) +CHR* £ &M 1 F ) +CHR* < 2<H3F 3 +CHR* C & 

K7F 3 +CHR* C WF > +CHR* < 2<HFF 5 

570 F2*=CHR* £ &H7F 3 +CHR* £ &H 1E3 + CHR 

$ C &H0 ) +CHR* £ &H0 ) £ Í»H 1 3 +CHR* < & 

H3 3 +CHR* £ &H3 > +CHR* £ &H 1 3 

580 F3*=CHR* C &HEO 3 +CHR* £ &HEO ) +CHR 

* C &HFO ) +CHR* £ &HFC ) h CHR* C &HFF ) + CHR 
$ £ SdHFF > +CHR* £ &HFF 3+CHR* ( &HFF ) 
590 F4*«CHR* £ &HFF ) +CHR* C &H3C ) +CHR 

* <: &H 1 O ) +CHR* ( &H80 3 +CHR* C &HEO ) +CHR 
$ ( ICO ) i CHR$ C &H80 3 +CHR* £ 2<H0 3 

GOO SPR I TE* £ 1 O > ~F 'I *+F2*+F3*+F4* 

610 X%=5:Y%=*35 

620 ' ******************** 

630 ' ^PROGRAMA PRINCIPAL* 

640 ' ******************** 

650 X==X -3 

660 E=STICK<Z> 

670 IFPLAYC1 >=0THENPLAYW2* 

680 I FE=» i THEMY%=Y%-3 ! BN=BN+ 1 O 

630 I FE=3THENX%=X%+3 ! BN«BN* 1 O 

700 I FE=5THENY%=Y*+3 ! BN=3M <• i O 

7 1 O I FE-7THENX%=X%~3 ¡ BN=BN+ 1 O 

720 IFE«2THENX%=X5J+3 ! Y%=Y% -3 ! 8N=B 

N+5 

730 IFE=4THENX%==X%+3 ! Y%=Y%+3 ! BN=B 
N+5 

740 IFE-6TI-IENX %=X%- 3 ! Y%=Y%+3 ! BN»B 
N+5 

750 I FE=8THENX%=X%-3 ! Yfc-YJÍ 3 ! BN=B 

N+5 

760 I F Y% < 1 OTHEM Y%~ 1 O 
770 I FYX > 1 60THEMY%= 1 60 
780 I FX%<5THENX%~5 

790 IFX%>=250THENSCREEN2 , 2 ! GOTO 3 
530 

SOO X%=X%-1 

8 1 O PUTSPR I TE 1 , ( X % , Y% 3 , 1 5 , 1 

Q20 1 

830 ' -ASTEROIDES- 

.340 ' 

850 PUTSPR ITE2 , C X , Y 3 , 1 1 , 1 O 
860 PUTSPR I TE3 , C X , Y+ 1 7 > , 1 1 , 1 O 
870 PUTSPR ITE4 , < X+50 , Y+90) ,11,10 
880 PUTSPR I TES , < X+50 , Y+l 1 O ) , 1 1 ,1 O 
890 PUTSPR I TES , £ X+l 21 , Y+l 41 > , 1 1 , 1 
O 

900 PUTSPR I TE7 , ( X+95 , Y+ 1 23 ) , 1 1 , 1 O 
310 PUTSPR I TES , C X + l 94 , Y+l 65) ,11,1 
O 

920 PUTSPR ITE9 , ( X+1 55 , Y+34 > , 11 , 1 O 
930 PUTSPR I TE 1 O , < X+l I O , Y+75 3,11,1 




O 

340 PUTSPR I TE 1 1 , C X+l 30, Y+ 129 3 ,11, 
1 O 

950 PUTSPR I TE 13 , C X+l 38 , Y+59 3,11,1 
O 

960 PUTSPR I TE 1 4 , C X +28, Y+59) ,11,10 
970 PUTSPR I TE 1 5 , C X + 1 72 , Y+59 >> T 1 , 1 
O 

980 PUTSPR I TE 1 6 , < X - 1 6 , Y+ 1 9 1 ) , 1 1 , 1 
O 

990 ONSPR I TEGOSUB 1 050 
1000 SPRITEON 
1010 GOTO 650 

1020 ' 

1030 ' -EXPLOSION-- 

1050 SPRITEOFF 

1 060 G0SUB3070 

1 070 X=300 ¡ Y*0 : X%~20 : Y%= 1 00 

1080 G0SUB1370 

1 090 IFNA=0THEN3200 

1 1 00 RETURM 

1 1 1 O ' ************************ 
1 1 20 ' *M 1 3 1 ONES : 2 - , 3 - , 4 - Y 5 - * 
1 1 30 ' ************************ 
1 1 40 END 

1 1 50 ' ***************** 
1160 ' *SPRITES MOVILES* 
11 70 ' ***************** 
1 1 80 SCREEN2 , 2 

1 1 90 A 1 *=CHR* ü 2<HF ) +CHR* < &H4 ) +CHR* 
C &H2 3 +CHRÉ £ ¿H 1 ) +CHR* £ &H 1 ) +CHR* £ &H 

2 :> +C» IR* £ &H4 3 +CHR* C &H9 3 

1 200 A2*=CHR* < &H9 3 +CHR* ( &M4 3 +CHR* 

( &H2 > h CHR* ( &H 1 3 +CHR* C &H 1 3 +CHR* < &H 

2 3 +CHR* <: &H4 3 +CHR* C S<HF 3 

1 2 1 O A3*=CHR* C &HFO 3 +CHR* C SiH20 3 +CH 

R* C 2<H40 ) +CHR* < 2<H80 ) +CHR* ( &H80 3 +CH 

R* C &H40 3 +CHR* C &H20 3 +CHR* C &H90 3 

1 220 A4*==CHR* C 2<H90 > +CHR* C &H20 3 +CH 

R* < &M40 3 4-CHR* ( &H80 :> +CHR* ( &H80 > +CH 

R* C &H40 3 +CHR* C &H20 3 +CHR* C S«HFO 3 

1 230 SPRITE*C 1 >=A1 *+A2*+A3*+A4* 

1 240 I FFA= 1 0RFA=6THENRETURM 

1 250 B 1 *=CHR* £ &H 1 3 +CHR* £ &H3 3 +CHR* 

C &H7 3 +CHR* C &HF 3 +CHR* £ &H 1 F 3 +CHR* £ & 

H3F 3 •+ CHR* < &H7F 3 +CHR* £ &HFF 3 

1 260 B2*=CHR* £ &HFF 3 +CHR* C &H7F ) +CH 

R* (. S(H3F 3+CHR*C S»H1 F 3 +CHR* £ 2.HF 3 +CHR 

*(&H3)+CHR*(2iH1 )+CHR*a«HO) 

1 270 B3*=CHR*C &H0 3+CHR*£ &H0 3+CHR* 

C &H0 )+CHR*<: &H0 )+CHR*C 2(H0 ) +CHR*C &H 

0 3 +CHR* £ &H0 ) +CHR* £ &H50 3 

1 280 B4*=CHR*< S.HAA )+CHR*( &H5 3+CHR 
* £ &H0 3 +CHR* C &H0 ) +CHR* £ &H0 3 +CHR* £ 2i 
HO ) +CHR* C 2.H0 ) +CHR* £ &H0 ) 

1 290 SPR I TE* < 2 3 =B 1 *+B2*+B3*+B4* 
1 300 C2*=CHR*C &HCO 3+CHR*( 8<HE0 3+CH 
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R* ( &HFO ) +CHR* C &HFF ) +CHR* C &HFF ) +CH 

R* C &HFF ) +CHR* C &HFO ) +CHR* ( &HCO ) 

1 3 1 O C3**CHR* ( &H0 ) +CHR* ( &H0 ) +CHR* 

( &H0 ) +CHR* í &H0 ) +CHR* < W3Q ) +CHR* < & 

HO > +CHR* < &HO ) +CHR* í &HO ) 

1 320 C4**CHR*< &H0 ) +CHR* < &H0 ) +CHR* 

( &H0 ) +CHR* C &H0 ) +CHR*< &H80 ) +CHR* < & 

HO ) +CHR* C &H0 ) +CHR* C &H0 ) 

1 330 SPR I TE* C 3 ) =C 1 *+C2*+C3*+C4* 

1 340 D 1 *=CHR* ( &H80 ) +CHR* C &H40 ) +CH 

R* C &H20 ) +CHR$ < &H 1 1 > *CHR* ( &H5 ) +CHR 

» ( &H7 > +CHR* ( &HF ) +CHR* C &H 1 F ) 

i 350 D2* SS CHR*< &H 1 F ) +CHR* C &HF ) +CHR 

$ < &N7 ) +CHR* C &H5 ) +CHR* ( &H 1 1 ) +CHR* C 

M ¡20 ) +CHR* C &H40 ) +CHR* C &HSO ) 

I 360 D3*»CHR$ C &H 1 ) +CHR* C &H2 ) +CHR* 

C &H4 ) +CHR$ C &H88 ) +CHR* C &HDO ) +CHR* < 

&HEO > +CHRf C &HFO ) i-CHR* C &HF9 ) 

1 370 D4*=CHR* C &HFS ) +CHR* C &HFO > +CH 

Ri* C &HEO ) +CHR$ ( &HDO ) +CHR* C &H88 ) +CH 

R* ( &H4 ) +CHR* C &H2 ) +CHR* C &H 1 > 

1 380 SPR I TE* < 5 ) =D 1 *+D2*+03*+D4* 

1 390 I FFA* 1 0RFA=6THE1MRETURN 

I 400 E 1 *==CHR* C &H 1 ) +CHR* ( &HF ) +CHR* 

( &H 1 F ) i CHR* < &H3F ) -i- CHR* ( &H7F ) +CHR* 

C &H7F ) 4-CHR* ( &H7 > +CHR* C &H7 ) 

1 4 1 O E2*=CHR* C &H7 ) +CHR* ( &H7 ) +CHR* 

C &H7 ) +CHR* ( &H3 ) +CHR* C &H4 ) +CHR* C &H 

4 > i CHR* C &M0 > -i-CHR* < &H0 ) 

1 420 E3*»CHR* í &H80 ) +CHR* ( &HFO ) +CH 

R* í &HFO ) +CHR* C &MF8 5 +CHR* ( &HFC ) + CH 

R* C &HFC ) +CHR* < &H0 > +CHR* < &H0 ) 

1 430 SPR I TE* C 4 ) =E 1 *+E2*+E3* 

1 440 SPR I TE* ( 7 ) =CHR* C &H 1 8 ) i-CHR* ( & 

M 1 8 > +CHR* <: M !3C ) +CHR* C &H7E ) + CHR* C & 

H I 8 ) +CHR* < &H 1 8 ) +CHR* C &H 1 8 > +CHR* C & 

Mi 8) 

' ^COMIENZO Y VARIABLES* 

COLOR 14,1,1: CLS : TY=0 ¡ FU=0 
CIRCLE (31 O ,96) ,96, 14 
CIRCLE ( 230 , 96 ) ,5,1 3 
CIRCLE (235 ,76) ,5, 12 
1 1 6 ) , 5 , 6 

6) , 13: PAI NT (235,7 
1 16) , 6 
1 1 6 ) , 7 , 1 4 
96 ) , 7 , 1 4 
,76), 7/1 4 
1 570 DRAW " BM255 , OC 1 4L20D 1 ONL 1 OD 1 N 
L10D10R20" 

1 580 DRAW" BM255 , 1 72C 1 4L20D 1 ONL 1 OD 
1NL10D10R20" 
1590 PAINTC255,50) , 14 
P A I NT í 255 , 5), 14 
PAINTC25S, 177) , 14 

f •x» 'As «J.* «X- «X* *4>* «J.* *X* 'X' 'JL' 
•T- •"(•■ -X' • T • "T - -T" «T 1 *t - 'a' 

1 *ESTRLLAS* 

."^» «^*. .«}s 

F0RD=0T0260 



I 450 
1 460 
1 470 
1 480 
1 490 
1 500 
1510 
1520 CIRCLE (235 
1530 RAI NT (230, 
6) , 12JPAINTC23S 
1540 CIRCLE (235 
1550 CIRCLE < 230 
1560 CIRCLE (235 



1 600 
1610 
1 620 
1 630 
1640 
1 650 



1 660 A= I NT { RND < 1 ) *255 > + 1 O 
1 670 B= I NT ( RND C 1 ) * 1 84 ) 
1680 C=INT(RND< 1 )*13) 
1 690 PRESETC A , B ) , C ! BEEP 
1700 NEXT 
1710 CLOSE 

1 720 OPEN" GRP 1 " FOROUTPUTAS# 1 

1 730 PRESETC 5 ,©),* ! PRINTttl , "NAVES 

1 740 I FF A= 1 ORF A=6THENRETURN 

1 750 PRESET C 5 , 1 84 ) ! PR I NT# 1 , " FUEL ! 

1 760 DRAW" BM52 , 1 86C 1 3R200D8L200U8 



1770 
1 780 
F 

1 790 
1 800 

F=10: 

C6=l 1 
1810 

1 320 
1 830 
1 840 
1 850 
1 860 
1 870 
1 880 
1 890 
1 900 
1910 
1 920 
1 930 
1 940 
3¡PAI 
1950 
1 960 
1 970 
1 980 
=NA+1 
1 990 
2000 



PAINTC55, 188) , 13 

L I NE C 230 , 1 86 ) - C 250 , 1 9 1 ) , 1 O , B 

X3=52: Y3=186 

X=50 : Y=97 : K=255 ¡ G==255 ! 1=255 ! 
H=l 00 : J=l 90 : M=255 : M=0 : C5= 1 1 ! 

:C7=i i 

* Jf! $ ;t- í% '-r'. # • M # # % % % 

• «PROGRAMA PRINCIPAL* 

' 'i! 'i" ±' -JL' ±' 'i* i: •}:' 4 é' ±' 'i' -y é ±* 'J:* ±' ±" ±' 

} 

' -ASTRONAVES QUE QUEDAN- 



IFNA=3THENC2=2 ! C3=2 ! C4=2 

IFNA=2THENC2-6 ! C3«2 ! C4=2 

IFNA=1 THENC2=6 ! C3=6 ! C4=2 

IFNA=0THENC2=S ! C3=6 : C4=6 

CIRCLECS2/8),3,C2 

CIRCLE (65, 8) , 3 , C3 

CIRCLE (73, O) , 3, C4 

PA I NT C 52 , 8 ) , C2 ! PA I NT ( 65 , 8 ) , C 

NTC78,3),C4 

I FFA=1 0RFA=6THENRETURM 
I FN A=0THENQ0T0 3230 
IFVA=1 THEN1 990 

IFBN=>20000ANDBN<20225THENNA 

: COLOR , ,10: VA= 1 : GOTO 1 870 

IFNA>4THENNA=4 

I F B N > 2 O 2 2 5 T HENCOLQ R , , 1 



TIEMPO DE JUEGO- 



2030 
2040 
2050 
2060 
2070 
2080 
2090 
2 1 00 
21 10 
2120 
21 30 
2140 
2150 
2 1 60 
2170 
2180 



TI-TI+1 

IFTI>=200THENTY=1 
PUTSPRITE1 , CX, Y) ,18, 1 
PUTSPR I TES , (H, N ) , CS , 2 
PUTSPR I TE 7 , C K , F ) , C6 , 2 
PUTSPR ITE4 , < I , J ) , C7 , 2 
E=STICKCZ) 

IFE=3THENX=X+5 ¡ X3«X3-» 1 
IFE= 1 THENY=Y-5 ! X3-X3+1 
IFE=5THENY=Y+5 ¡ X3=X3+ 1 
IFE=7THENX=X-5 ¡ X3=X3+1 
IFE=2THENX=X+S ¡ Y=Y-5 ! X3=X3-2 
IFE=4THENX=X+5 ! Y=Y+5 ! X3«X3+2 
IFE=6THENX=X-5 ! Y=Y+5 ! X3=X3+2 
IFE=8THENX=X-5 ! Y=Y-S ! X3=X3+2 
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Programa 



2190 IFFA=3THENC5=0 

2200 I FFA=4THENCS=0 ! CG=0 

22 1 0 I FFA=5THENC5=0 ! C6=0 ! C7=0 

2220 ' 

2230 ' -FUEL QUE QUEDA- 

2240 ' 

2250 PUTSPRITE8 , C X3 , I 86 ) , 1 5 , 7 
2260 IFX3>250THENFU=0 ! X3»S2 ! PLAY" 
S I Al B2C3D4E5 . " ! FORSS=OT03000 ! NEXT 
: G0SUB3070 
2270 IFX <50THENX=S0 

2230 I F X 3 > =225 AND X 3 < =229THENC0L0R 
, , 1 3 

2290 I F X 3 > «230THENFU- 1 ! COLOR , , 1 J 
GOTO 2340 
2300 GOTO 2360 

2310 ' 

2320 ' -NAVE CON REPUESTO DE FUEL 

2330 ' 

23/1 0 PUTSPR I TE9 , < XS .. 99 ) , 1 3 , 2 

2350 XS=X5-16 

2360 IFX>240THENX=240 

2370 I F Y < 1 OTHENY-- 1 O 

2380 I FY> 1 65THENY= 1 65 

2390 I FM < 1 0THENM=2S5 

2400 I FM < 1 80THENM=M 1 6 

2410 I Fl< < 1 0THENK=2SS 
2420 I F I < 1 OTHEN I =255 
2430 ONSPRITE G0SUB2980 
2440 SPRITEOM 
2450 ' ********* 
2460 ' *DISPARO* 
2470 ' ********* 
2480 0=STRIG<Z> 

2490 I F0< >OTHENPLAY" V 1 2L I 403A" ! R= 

1 5 : X3=X3+3 : G0SUB25 1 O 

2500 GOTÜ 2590 

2510 Xi=X-H6 

2520 C5=7 : C6=8 ! C7=3 

2530 ONSPR I TEG0SUB2680 

2540 SPRITEOM 

2550 PUTSPR I TE6 , < X 1 , Y > . R , 3 
2560 Xl=Xl+30 

2570 I FX 1 >2S0THENR=0 ! PUTSPR I TE6 , C 
X 1 , Y ) , R , 3 : RETURN 
2580 GOTO 2550 
2590 K=K--10 

2600 F=RND ( 1 > ! F= I NT ( 4Q*F ) +20 
26 1 O N=RND C 1 > ! N= I NT < 4G*N ) +30 
2620 M=M-S 
2G30 1=1-12 

2640 ,T=RND ( 1 >.', J= I NT C 40*J ) + 1 20 
2650 GOTG 1960 
2660 GOTO 2620 
2670 GOTO 2670 
2680 SPRITEOFF 




2690 ' ********************** 
2700 ' *CQMPROB ACION IMPACTO* 
271 0 ' ********************** 
2720 I FFU» 1 THEN2740 
2730 GOTO 2750 

2740 I FY>90ANDY< 1 08ANDX 1 > X5THENG0 
SUB3400 : RETURN 

2750 IFY>N-6ANDY<N+6ANDX1 >MTHENP1 
=5 : S=M : T=N : G0SUB2820 ¡ M=255 ¡ J=0 ! R 
ETURN 

2760 IFY> J-6ANDY< J+6ANDX 1 > ITHENP 1 
=4 : S= I : T=.J : Q08UB2820 : 1 =255 : .J=0 : R 
ETURN 

2770 IFY>F-6ANDY<F+6ANDX1 >K THENP 
1 =7 : S=K : T=F : G0SUB2820 ¡ 8=255 ! K=0 ¡ R 
ETURN 

2780 RETURN 

2790 ' ************************ 

2800 ' «EXPLOSION NAVE ENEMIGA* 

.¿! y 1 O & % ■í*- -t- 4* -T- i*- ••{*• -i*- -"i 1 - -r- ••!'• -t* & -í* 

2820 PUTSPR I TE2 , C S , T ) , O , 4 

2830 F0RH1=1T02 

2840 F0RG1=0T0I5 

2850 S0UND8,3 

2360 S0UND10, 16 

2870 S0UND6 , 30 ! S0UND7 , 1 99 

2880 SOUMD 1 2 , 56 ! SOUND I 3 , O 

2890 PUTSPR I TEP 1 , C 8 , T ) , G 1 , 4 

2900 NEXTG1 ¡NEXTH1 

2910 BN=BN+250 

2920 PUTSPR I TE2 , C O , O ) , O , 4 

2930 BEEP I I FT Y= 1 TI IENT Y=0 ! T I =0 ! GOS 

UB3460 

¿940 RETURN 

2350 ' ********************** 
2960 ' COMPROBACION IMPACTO* 
2970 ' ********************** 
2 9 8 O S P RITEOFF 

2990 I FX > X 5+ 9 AND X < X 5+'3 AND Y > 90 AND Y 
< 1 O 8 T !) E N G 0 S U B 3 O 7 O 

3000 IF X<M+8 AND X>M~8 AND Y>N • 1 

6 AND Y<N+ 1 6TI IEN GQSUB 3070 

3010 IF XÍK+8 AND X>K-8 AND Y>F-1 

6 AND Y<F+1 6THEN GOSUB 3070 

3020 IF X<I+8 AND X>I-8 AND Y>.J 1 

6AND Y<J+16THEN GOSUB 3070 

3030 RETURN 

3040 ' ********************* 

3050 ' *EXPLOSION ASTRONAVE* 

3060 ' ********************* 

3070 F0RH1=1T010 

3080 F0RG1 =0T015 

3090 S0UND0,3 

3100 .SOUND! O, 16 

3 1 1 O S0UND6 , 30 ¡ SOUND 7' , 1 99 

3 1 20 SOUND 1 2 , 56 ! SOUND 1 3 , O 

3 1 30 I FF A= 1 THEN PUTSPR I TE 1 , < X % , Y% ) 

,01 ,5 ¡GOTO 3150 

3 1 40 PUTSPR I TE 1 , C X , Y ) , G I , 5 
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31 SO NEXTG1 : NEXTH1 

3 I 60 PUTSPR ITE1 t O , I 92 ) , O , 5 ! M A=N A 

-1 

3 1 70 PUTSPR I TES , C O , 50 ) ,0,2 
3 I 30 I FFA= 1 THENBEEP ! RETURN 
3 1 90 BEEP : X»20 ! Y»8S ! RETURN 1 300 
3:200 ' ******* 

32 10 ' *FINAL* 
3220 ' ******* 

3230 SCREEN3 ! C0L0R3 ,1,1: CLG 
3240 PRESET C 1 2 , 1 2 ) ! PR I NT* 1 , " F I 
N" 

3250 PRESET C 20 , 1 30 ) ! PR I NT# 1 , " PART 
IDA" 

3260 Z$=" VI 5T1 0004D61 BA2GABQ2B05D 

E2D04B2GAGABGE2DG205ED04B26AGA205 

ED04B205DE2D04B2GAGABGE2DG2 . " 

3270 U*="V1 3T1 0004DGBA2GABG2B05DE 

2D04B2GAGABGE2DG205ED04B2GAGA2Ü5E 

DÜ4B205DE2D04B2GAGABGE2DG2 . " 

3280 PLAYZ*,U* 

3290 I FPLAY { 1 ) < > 0THEN3290 

3300 SCREENO ! KEYOFF ¡ COLORI ,15,1 5 

3310 L0CATE7 , S ¡PRINT"TU PUNTO AC 

ION ES DE:" 

3320 LOCATE 10,1 O ! PR I NTBN" Pts . " 

3330 A$="" 

3340 A*=IIMKEY* 

3350 LOCATEO, 12: PRINT 

OTRA PARTI DA £ S/N ) " 
3360 I FA$= " S " ORA*=" s " THENRUN 
3370 I FA$="N" ORA$=" n" THEN3390 
3380 GOTO 3340 

3390 KEYQN ! COLOR 15.4.4: CLS ! END 
3400 PLAY"S8CDGA" ¡FIMO 
34 1 O X 3«S2 : PUTSPR I TE9 , £ 0 , 1 50 ) ,0,2 
3420 RETURN 

3430 ' ****************** 
3440 ' *CAMBIO DE MISION* 
3450 ' ****************** 
3460 PUTSPR I TE 1 , C X , Y ) , O , 1 
3470 PUTSPR I TES , C M , N ) , O , 2 
3480 PUTSPR I TE7 , ( K , F > , O , 2 
3490 PUT SPR I TE4 , £ I , J > , 0 , 2 
3500 PUTSPR I TES , £ X 3 , ) 86 ) , 0 , 7 
35 1 O PUTSPR I TES , ( 1 25 , Y5 ) ,0,1 
3520 PUTSPR I TES , <: X 1 , Y ) , 0 , 3 
3530 cls:fa=fa+i 

3540 M*="T100V1 505CDC04A#AA#05C04 
GAA#AA#05C2DC04A#AA#05C04G05C04AF 

3550 DR AW " BM30 , 20C6D50R 1 0U40F 1 SE 1 
5D40R 1 OUSOL 1 OG 1 5H 1 5L 1 0BR60D50R 1 OU 
S0NL1 0BR1 SR30D1 0L20D1 0R20D30L30U1 
0R20U1 OL20U30BR40R1 0D50L1 0U50BR20 
" : GOTO 3560 

3560 DR AW " R30D50L30US0BF 1 OR 1 0D30L 
1 OU30BR30BU1 0D50R5U30F30R5US0L5D3 
OH30L5BD70BL100" 

3570 P A I NT { 3 1 ,21 ) , 6 : P A I NT (91 ,21 > , 
6 : PA í NT (121 , 21), 6 : PA I NT ( 181, 2 1 ) , 6 
IPAINTC 161 ,21 ) ,S:PAINT(216,21 ) ,6 



3530 IFFA=7THENFA= 1 

3590 IFFA=1 THE N G O S U B 3 6 5 O 

3600 I FF A=2THENGGSUB3690 

36 1 O I FFA=3THENG0SUB3740 

3620 I FFA=4THENG0SUB3770 

3630 I FFA=5THENG0SUB3800 

3640 I FFA=6THENG0SUB3830 

3650 DRAW " BD80BL80C 1 0D50L 1 OUSOL 1 O 

E20" 

3660 P A I NT ( 1 25 , 1 20 ) , 1 O 
3670 I FPL A Y ( 1 > < > 0THEN3670 
3630 RETURN 1 190 

3690 DRAW " BD80BL 1 OOC 1 0USE5R25F5DS 

G35R35D5L40U3E30U5L 1 5G5L5U2" 

3700 PAINTí 1 25, 96) , 1 O 

3710 PRESET ( 60 , 80 ) ! PR I NT# 1 , " PUNTU 

ACION: ";BN:PLAYM* 

3720 I FPLAY ( 1 )'O0THEN3720 

3730 RETURN 1 190 

3740 DRAW "BD80BL1 OOC 1 0R40D4SL40US 
R35U1 5L20U5R20U1 5L35U5" 
3750 PA I NT ( 1 25 , 1 05 ) , 1 O 
3760 GOTO 3710 

3770 DRAW" BD80BL 1 OOC 1 0D25R20D20R5 
U20R1 0U5L1 0U25LSD25L1 5U20L5" 
3780 PAINTÍ 118, 120) , 10 
3790 GOTO 3710 

3300 DRAW" BD80BL 1 OOC 1 0R50D5L45D20 
R45D30L50U5R45U20L45U30" 
38 1 O PA I NT ( 1 25 , 1 05 ) , 1 O 
3820 GOTO 3710 

3830 DRAW" BD80BL 1 OOC 1 0R50D5L45D 1 5 
R45D40LS0NU60BE5U30R40D30L40" 
3840 PA I NT ( 1 25 , 1 05 ) , 1 O : PRESET ( 60 , 
80 ) : PR I NTtt 1 , " PUMTUAC I ON ¡ " ¡ BN 
3850 PLAYM* 

3860 IFPLAYCl ) O0THEN3860 

3870 RETURN3910 

3880 ' *%************ 

3890 ' *SEXTA MISION* 

3900 ' ***********^t** 

39 1 O SCREEN2 , 2 ! COLOR 15,1,1: CLS ! GO 

SUBI 870 : G0SUB1 650 ! G0SUB1 1 90 ! GOSUB 

1 340 

3320 ' ***^************* 
3930 ' *SPRITES MOVILES* 
3940 ' ******^*********^¡ 
3950 G 1 gMCHR»! m 1 ) +CHR* ( &H3 ) +CHRÍ. 
( &H7 ) +CMR4 ( &HF ) +CHR* £ &HF ) +CHR* ( Zú I 
F S+CHR4 ( &HF ) +CHR* ( &HF ) 
3960 G2*=CHR* ( &H 1 E ) +CHR* ( &H 1 E ) +CH 
R $ ( &H3E ) +CHR* ( &H3E ) +CHR* ( &H7E ) +CH 
R* ( &H7E ) +CHR* ( &HFF ) +CHR* ( &HFF ) 
3970 G3$^CHR$ ( &H80 ) -¡ CHR$ ( &MGO ) ¡ CU 
R* ( SiHEO ) +CHR* C M IFO ) +CHR* ( &HF0 ) +CH 
R$ ( &HF.0 ) +CHR$ C &HFO ) +CHR* í &HFO ) 
3980 G4*=CHR* ( &H78 ) ■* CHR* ( &H78 ) +CH 
R* £ &H7C ) +-CHR* ( &H7C ) +CHR* ( &H7E ) +CH 
R* ( &H7E ) •" CHR* < &HFF ) +CHR* £ &HFF ) 
3990 SPRITE3K1 1 )=G1 *+Q2*+Q3*4-G4* 
4000 SPR I TE* (12) =CHR$ £ &hl 1 8 ) +CMR* £ 
&H3C ) +CHR» £ &H7E ) +CHR$ ( &HFF ) +CHR$ £ 
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Programa i 




ie ir niD»íP«. I. »)'"«•• OR niD»CP«. i. nAjQjJT'»^» i* CfftSCrniotcP» 



&HE7 

&H18 
401 O 
4020 
4030 
4040 

40 SO 
4060 
4070 
4 OS O 
4090 

4 1 00 
4110 
4120 
4 1 30 
4140 
4 1 50 
4160 
4 1 70 
4180 
4190 
4200 
421 O 
4220 
4230 
4240 
4250 
4260 
4270 
4230 
4290 
4300 
431 O 
4320 
4330 
4340 
4350 
4360 
4370 
4380 
10 

4390 
4400 



) -¡ Cl IR* ( &H7E ) +Ci IR* C &1I3C ) +CHR* ( 
> 

X«1 00 : Y»1£0 : M=30 : N=45 : 0=60 
' * * * * * * * * * * * $ * * * ¡fe >, * * * 
' ^PROGRAMA PRINCIPAL* 

PUTSPRITE1 , ( X , Y > , 1 1 , 1 
J=10 

PUTSPR I TE7 , ( 1 1 O , ,T ) , 1 5 , 1 1 
PUTSPR ITE3 , ( 1 30 , M ) , 3 , 1 2 
PUTSPR I TE 4 , C 80 , N ) , 4 , 1 2 
PUTSPR I TES , ( 11 2 , O ) , 6 , 1 2 
PUT SPR I TE6 , ( 98 , O ) , 1 S , 1 2 
Y=Y+2 ¡ M=M-6 : N=N ~ 1 O ! 0=0h 3 
IF0>190THEN0=40 

ifplay ( 1 >=0thenplayw3* 

ifna=0then3230 

e=stickcz:> 

IFE=1 THENY=Y-~3 

IFE=2THENY=Y-3 ! X=X+5 I DI =0 

IFE=3THENX=X+S : DI =0 

IFE=4THENY=Y+3 ¡ X=X+5 ! DI =0 

IFE=5THENY=Y+3 

I FE=6THENY=Y+3 ¡ X=X-5 ¡ DI =1 

IFE=7THENX=X~5:D1=1 

IFE=8THENY=Y-3 ! X=X--5 ! DI =1 

IFD1=0THENX=X+2 

IFDl=1THENX=X-2 

IFX>240THENX=240 

IFX<10THENX=10 

IFY>160THENY=160 

If Y< 1 0TKEMY=1 O 

ONSPR I TEG0SUB4370 

SPRITEON 

QOTO 40S0 

I .„ 

' -EXPLOSION Y ACLOP AM I ENTO- 

i ... ^ „,.. . m ^ - m 

SPRITEOFF 

I F X > 1 00 AND X < 1 20 AND Y < 30T HEN44 

G0SUB3070 
RETURN401 O 



4410 IFX>1 10THENX = X- 1 
4420 IFX<1 10THENX-X+1 
4430 IFX=1 1 0THEN4460 
4440 PUTSPR I TE 1 , C X , Y ) , 11 , 1 
4450 GOTO 4410 
4460 Y=Y-1 

4470 PUTSPR I TE 1 , ( X , Y > . 11 , 1 
4480 I FY= 1 0THENG0T04S30 
4490 GOTO 4460 

4500 ' *******^**%**^***í|c<r*"* 
4510 ' ^TRASLADO A LA TIERRA* 
4S20 ' %%%%%%%%%%^%%%%^3^%%% 
4530 F0RSS=0T0250 í NEXT ¡ J= 1 80 
4S40 PUTSPR I TEO , C X , Y ) , O .. 1 
4550 PUTSPR I TES , C 1 30 , M ) , O , 1 2 
4560 PUTSPR I TE 4 , C 80 , N ) , O , 1 2 
4570 PUTSPR I TES ,(112, O), O, 12 
4580 PUTSPR I TE6 , ( 98 , O ) , O , 1 2 
4590 PUTSPR IT E 1 , ( X , Y > , 0 , 1 
4600 PUTSPR ITE7 , ( 1 1 O , J ) , I 4 , 1 1 
4610 J=J-1 
4620 S0UND8,3 
4630 S0UND10, 16 
4640 SOUNDS , 30 ¡ S0UMD7 , 1 99 
4650 SOUMD 1 2 , 56 ! SOUND 1 3 , O 
4660 8N=BIM+30 

4670 IF..K-20TI IENBEEP ! GOTO 3230 
4680 GOTO 4600 
4630 END 




T 



est de Listados i 



Satélite espacial i 
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3280 


-228 


3880 


- 58 


4480 


~ 32 


- 63 


3290 


-103 


3:830 


- 58 


4490 


- 2(3 


r 58 


3300 


-100 


3300 


- 58 


4500 


- 58 


- 58 


3310 


- 73 


39 1 0 


-141 


4510 


- 58 


-205 


3320 


- 53 


3320 


- 58 


4520 


- 68 


- 95 


33:30 


1 52 


3930 


-■■ 58 


4530 


-26 3 


-129 


3340 


- 64 


3940 


- 53 


4540 


... 9£ 


- 32 


3350 


-155 


3950 


- 85 


4550 


-153 


- 7 


3360 


-220 


3960 


- 1 1 5 


4 560 


-1 05 


- 13 


3370 


-161 


3370 


-21 4 


4570 


- 1 39 


- 1 42 


3380 


- 1 76 


3330 


-207 


4580 


- 1 26 


cg 


3390 


-1 40 


3990 


142 


4530 


- 9 7 


\z o 


3400 


-1 16 


4000 


- 39 


4600 


- 1 45 


- 50 


34 1 0 


- 1 02 


4010 


- 4 


46 1 0 


- 1 35 


- 91 


3420 


-1 42 


40 3 v 


- 58 


4620 


- 29 


-232 


3430 


- 58 


4030 


- 58 


4630 


- 40 


-241 


3440 


- 58 


4040 


- 58 


464 0 


- 76 


— 29 


3450 


- 58 


4050 


-106 


4650 




- 40 


3460 


- 97 


40;,..' 


- 82 


4660 


- 45 


- 76 


3470 


- 80 


4070 


... -¡ 46 


4670 


-239 


-169 


3480 


- 72 


4080 


-156 


4680 


- 1 60 


- 48 


3490 


- 71 


4090 


1 09 


463(3 


- 1 29 


- 43 


3500 


- 17 


4 ! 00 


- 1 45 






- 9 


351 0 


-210 


4 1 1 0 


-133 


tütal: 


-214 


3520 


- 1 53 


4 1 20 


- 1 3 




637 


-247 


3530 


-21 7 


4 1 30 


— •"*:• 0 0 






-1 42 


3540 


-104 


4 1 40 


-248 






- 53 


3550 


-234 


4150 


-172 






- 53 


3560 


- 1 46 


4 1 60 


-123 
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Programa 



Por Juan C. Ruiz 



SALTA CUBOS 



Esta es una simpática ver- 
sión del famoso Q-bert y en 
la que hay que pintar los cu- 
bos evitando que una pelota 
te liquide. Tras una primera 
pantalla pasas a una segunda 
y a una tercera. Si sales de la 
pirámide de cubos pierdes el 
juego. 
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10 ' SALTA-CUBOS 

20 ' ! DE J. C RUI 2 



30 



MSX-CLUB 



35 . 

40 ON STGP GOSUB 1 1 00 
50 STOP ON 

60 CLS ¡ KEY OFF ! COLOR 10,1,1 

80 PR I NT : PR I NT ! PR I NT ! PR I NT " MUEVE 

A SALTA-CUBOS POR LA PANTALLA EMP 

LEANDO EL JOYSTICK O EL CURSOR PA 

RA HACERLE SALTAR DE UN CUBO A OT 

RO" 

90 PR I NT :PRI NT "CUIDADO CON LA PEL 
OTA SALTAR I NA Y NO SALTES DE LA P 
I RAM IDE EN CUYO CASO PERDERAS TOD 
AS TUS VIDAS" 

100 PR I NT : PR I NT "TI ENES TRES VIDAS 

PARA EMPEZAR" 
110 PRINT"SI ESTAS ARRINCONADO IM 
TENIA SALTAR POR ENCIMA DE LA PEL 
OTA" 

120 PRINT:PRINT"/,T/ PARA .JOYSTICK 

/C/ PARA EL CURSOR" 
130 AA**INKEY*Í IF AA*="J" OR AA*= 
" j" THEN M=l 1G0T0 160 
140 IF AA*="C" OR AA*="c" THEN M= 
0:60T0 160 
150 GOTO 130 

1 60 S CREE EN 2,2,0: HS=0 ¡ OREN" GRP ! " A 
S#1 

1 70 C*= "H15E1 5F 1 5G 1 5D 1 6H 1 SU 1 5D 1 5F 
1 SE I SU 15" 

180 FOR X=l TO 1 0 ! POR N=25S TO 1 
STEP -19: SOUND 7 , 254 ¡ SOUND 8 ,15: S 
OUND O , N : SOUND 1,1: NEXT ! NEXT : SOUM 
D 8, O: SOUND 7,254 
190 LL=3 
200 S=0 

210 GOSUB 1060 

220 IF SO 100 AND SO 200 THEN CL 
S : COLOR 10 

230 IF S=100 THEN CLS ¡ COLOR , 4 , 4 : C 
LS: COLOR ,4 

240 IF 8=200 THEN CLS ¡ COLOR ,8,8: 
CLS : COLOR 8 

250 IF 8=400 THEN CLS j COLOR ,3,3: 
CLS : COLOR , 3 

260 IF S=600 THEN C=l ! CLS ¡ COLORI . 
I 5 ,15: CLS : COLOR , 1 5 

270 IF 8=500 THEN CLS ¡ COLOR , 1 4 , 1 4 
¡ CLS ¡ COLOR , 1 4 

280 IF 8=300 THEN CLS : COLOR ,13, 13 
: CLS: COLOR, 13 

290 PSET ( ] 50 , I O > ,13: PR I NT# 1 , " PUNT 

OS=";s 

300 B=55:A=128 
310 C=128¡D=1 15 

320 v=5 : w=5 : x=s : Y=5 : z=5 ; vv=5 : WW=S 
: xx=5: YY=s:zz=6 

330 GOTO 750 



340 GOTO 570 

350 DRAW" BM 1 28 , 70 ; XC* ¡ " ! DRAW "BM1 

13,1 oo ; xc* ; " : drawbm i 43 , ¡ oo ; xc* ; " 

: DRAWBM98 , 1 30 ¡ XC* ) " \ DRAWBM 128 , 1 
30 ; XC* ; " : DRAWBM1 58 , 1 30 ¡ XC* ¡ " : DRA 
WBM1 73 , 1 60 ; XC* ; " : DRAWBM1 43 , 1 60 ¡ 
XC*; " : DRAWBM1 13, 160; XC*; " : DRAW" 6 
M83, 160;XC*;" 

360 IF SX600 THENPAINT<A-5,B+15> 
,10: PA I NT ( A+5 , B+ I 5 ) , 1 O ELSE PA I N 
T< A-5,B+l 5) , 1 :PAINT(A+5,B+15>, 1 
370 IF V=10 AND W=10 AND Y=10 AND 
Z=10 AND VV=10 AND WW=10 AND XX= 
10 AND YY=10 AND 22* í O THEN GOTO 
720 

380 IF A=C AND B=D THEN 790 
390 PUT SPR I TE 2 , í C-8 , D-8 ) , 1 0 , 2 
400 H=RNDC2> 

410 IF H=l THEN GOTO 510 

420 CC=C:DD=D 

430 IF B > D AND A>C THEN C=C+15¡D= 
D+30 

440 IF B < D AND A<C THEN C=C-15¡D= 
D-30 

450 IF B>D AND A<C THEN C=C-15:D= 
D+30 

460 IF B<D AND A>C THEN C=C+15:D= 

D-30 

470 IF CC=C AND DD=D AND A>C THEN 

D=D-30:C=C+15 
480 IF CC=C AND DD=D AND A<C THEN 

D=D-30:C=C~15 
490 IF CC=C AND DD=D AND B<D THEN 

D=D-30:C=C-1S 
500 IF CC=C AND DD=D AND B>D THEN 

D=D+30:C=C+15 
5 1 O PUT SPR I TE 2 , < C- 8 , D-8 3 ,10, 2 
520 J=STICKCM) : IF ,T=2 OR ,T=4 OR J 
pS OR J=8 THEN 530 ELSE 350 
530 IF J=2 THEN A=A+1 5 ! B=B-30 
540 IF ,T=4 THEN A=A-¡ 1 5 ! B=B+30 
550 IF .J=S THEN A=A- 1 5 ! 8=B+30 
560 IF J=8 THEN A=A- 1 5 : B=B-30 
570 PUT SPR I TE 1 , C A-8 , B-8 ) , 2 , 1 
580 IF A=143 AND B=25 OR A=158 AN 
D 8=55 OR A* 173 AND 8=85 OR A- 188 

AND 8=115 OR A=203 AND B=145 OR 
A=218 AND B=175 OR A=183 AND B=17 
5 OR A=158 AND B=175 OR A=128 AND 

B=I7S OR A=98 AND 8=175 OR A=68 
AND B=175 OR A=53 AND B=145 OR A= 
68 AND B=l 15 THEN 920 
590 IF A=83 AND B=35 OR A=98 AND 
B=55 OR A=I13 AND 8=25 THEN 920 
600 PLAY "T255V1505G" 
61*0 IF A=128 AND B=55 THEN V=10 
620 'IF A=113 AND B=85 THEN W=10 
630 IF A=¡43 AND B=85 THEN X=10 
640 IF A=98 AND B=115 THEN Y=10 
650 IF A=128 AND B= II 5 THEN Z=10 
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Programa 



660 
670 
680 
690 
700 
7 ] o 

720 
TO 



IF A=158 AND 8=115 THEIM W=10 
IF A=173 AND £5=145 THEN WW»10 
IF A=143 AND D=145 THEN XX = 10 
IF A=113 AND 8=145 THEN YY=10 
IF A=33 AND 8=145 THEN 22=10 
GOTO 350 

SOUND 8, O ¡SOUND 7 , 255 : POR N=l 
255 STEP 3: SOUND 7, 254 ¡SOUND 
8 ,15; SOUND O, Ni SOUND 1,0: NEXT ! SOUN 
D 8, O ¡SOUND 7,254 
730 S=S+100 
740 GOTO 220 
750 PUT SPRITE 
760 IF LL=2 OR 
TE 4 , ( 40 , 20 > , 2 , 1 
4 , ( 40 , 20 ) , 1 , 1 

770 IF LL=3 THEN PUT SPRITE 5,(60 
, 20 ) , 2 , 1 ELSE PUT SPR I TE 5 , ( 60 , 20 

> , U 1 

780 GOTO 340 

790 FOR N=255 TO 1 STEP -2 ¡ S0UND8 
,15¡ SOUND 7 , 254 ! SOUNDO , N ! SOUND 1 , 
O ¡ NEXT : S0UND8 , O ! SOUND 7 , 254 
800 LL=LL~- 1 

IF LL=0 THEN 830 
GOTO 220 

CLS ¡ SCREEN O ! COLOR 10,1 

primt:print:print" te h 

MATADO" 



6 , < 20 , 20 ) , 2 , 1 
LL=3 THEN PUT SPRI 
ELSE PUT SPRITE 



8 1 O 

820 
830 
840 
AN 

550 PRINT I PRINT" 
UNTUADO" ;S 

860 IF S>HS THEN HS=S 
370 PRINT ¡ PRINT" 
NTU ACION ES";HS 

830 PR I NT ¡ PR I NT" PRES I ONA CTRL- STO 



PERO HAS P 



LA MAXIMA PU 



DESPUES F5 
GOTO 890 

CLS 

GOTO 840 
REM 

F-6 ¡ H=6 
REM 

F=F- . 2 
H=H~ . 2 
IF 1< 1 28 
IF A>128 
IF A=123 



A=A--H : 8=8+4 
A=A+F : B=B+4 
B=B+2 

1 STEP -19: SOUN 



P Y DESPUES F5 PARA JUGAR" 
890 
900 
9 1 O 

920 
930 
940 
950 
960 

970 IF 1 <128 THEN 
980 IF A>128 THEN 
990 IF A=123 THEN 
1000 FOR 8=255 TO 
D 8,15: SOUND 7 , 254 : SOUND O, B: NEXT 
: SOUND 8, O ¡SOUND 7,254 

1 0 1 O PUT SPR I TE 6 , ( B-8 , A 8 ) , 2 , 1 

1020 IF A<10 OR A>218 OR B>185 TH 
EN GOTO 1040 
1030 GOTO 940 
1040 REM 

1050 SCREEN 2, 2, O ¡FOR J=l TO 1000 
¡NEXT ¡GOTO 830 

1060 FOR Y=l TO 2:S*="":F0R X = 1 T 
O 32:READ D : S*=S$+CHR$< D ) : NEXT X: 
SPR I TE* C Y ) =S$ ¡ NEXT Y 
1 070 DATA 3,7,1 5 , 25 , 57 , 1 27 , 1 27 , 1 1 
28 , 1 5 , 7 , 6 , 6 , 6 , 1 4 , 1 92 , 224 , 240 
1 56 , 254 , 254 , 238 , 220 , 23 , 240 , 2 
, 96 , 96 ,112 

15,31 ,63,63, 127, 127, 1 
¡,31 , 15,3,0,0, 192,240, 



9 , 59 , 
, 1 52 , 
24 , 96 

1 080 DATA 3 , 
27 , 1 27, 63 , 63 
I 84 , 1 38 , 220 , 206 , 238 , 254 , 254 , 252 , 2 
52 , 248 , 240 , 1 92 , O , O 
1 090 RETURIM 
1100 CLS 



Test de Listadosi 



Salta cubos 




TO 


- 58 


1 70 


i o 


330 


-135 


1 00 


-143 


650 


- 47 


8 1 0 


- 76 


20 


- 58 


1 80 




340 


-2 i 1 


soo 


77 1 39 


660 


- 1 59 


320 


- i 1 5 


30 


- 58 


1 00 


— ] r,F, 


350 


3 


B 1 0 


- 37 


670 


-206 


330 




35 


- 58 


200 


- 83 


360 


- 1 83 


520 


■~lb2 


680 


-202 


840 


145 


40 


- 16 


210 


195 


370 


- 1 50 


530 




630 


- 1 50 


8S0 


-176 


50 


- 37 


220 


- 1 82 


380 


- 1 OC 


540 


-254 


700 


-122 


860 


- 30 


60 


- 28 


230 


TV 67 


390 


~ 87 


ssó 


- 1 


710 


-246 


3 70 


- 94 


80 


• ,:39 


. ' - 1 1 '■ 


~l 35 


400 


- 34 


560 


- 4 


720 


- 50 


330 


- 51 


90 


-•202 . 


250 


) 22 


A i 0 


- 68 


570 


- 75 


730 


-249 


8$Ü 


20 


1 00 


- 85 


260 


-241 


420 


- 1 73 


S80 


-202 


' 740 


-1 15 


900 


-159 


1 10 


- 1 1 6 


270 


-249 


4:30 


- i ¡té. 


590 


— 3j~*¡ 


750 


-253 


9 i q 


-226 


120 


- 16 


28 0 


- i#6 


440 


■ i m 


600 


-124 


760 


-137 


920 


- 0 


1 30 


- 60 


290 


-105 


Sp 


-1 SI 


6 1 0 


-233 


770 


34 


930 


-212 


1 40 


-114 




-112 


460 


-ISi 


620 


-255 


780 


"*236 


940 


- 0 


1 50 


- 25 


3 i o 


~ 1 76 


470 


- 1 33 


630 


-202 


790 


- 1 27 


950 


-202 


1 60 


... G7 


320 


-100 


mo 


- 1 4 1 


640 


- 16 


800 


- 36 


960 


-206 





Programa 



GRÁFICOS 
ALEATORIOS 



Este sencillo programa te va 
a encantar, puesto que con- 
tinuamente elabora vistosos 
dibujos geométricos al azar. 



I 0 ' *****3M!****3fC********# 

20 '«GRAFICOS ALEATORIOS* 

30 

40 SCREEN2 

50 COLOR 11,1,1 

60 FOR A=l TO 5 

70 READ B 

80 QOSUB 130 

30 NE X T A 

100 B**(RND( 1 )*5)+l . 3 

I I O GOSUB 1 30 



120 GOTO 100 

130 CLS : C=0 : 0=1 

140 FOR D=0 TO 300 STEP B 

1 50 E= 1 30+COS í D > * 1 20*0 

1 6 O 1=95 + S I IM C D ) * 9 4 * O 

170 LINE-ÍE, I ),C 

1 80 0=0* . 997 : C= 1 1 : NEXT 

190 FOR D=0 TO 2999: NEXT 

200 RETURN 

21 O DATA 3 . 1 , 2 . 1 1 , 1 . 58 , 1 . 24 , 1 



Test de listado 



Gráficos aleatorios 



10 




50 




90 


-196 


130 -166 


170 


- 27 


210 - 21 


20 


- 58 


60 


- 1 79 


1 00 


-215 


140 - 6 


1 80 


-230 




30 


- 58 


70 


•201 


no 


- 29 


150 -146 


1 '90 


— 58 


TOTAL : 


40 


-216 


80 


- 29 


120 


-251 


160 - 86 


200 


-142 


2455 



DATA BECKER 



EL N.*1 EN 
INFORMATICA 



MSX 





MSX 




El 


! 


Manual 




Escolar 














Escrito para alumnos de los últimos 
cursos de E6B y de BUP. este libro 
contiene muchos programas para resol- 
ver problemas y de aprendizaje descn- 
tos de una forma muy completa y fácil 
de comprender Teorema de Pitágoras. 
progresiones geométricas, esentura ci- 
frada, crecimiento exponencial verbos 
irregulares, igualdades cuadráticas, 
movimiento pendular, estructura de 
moléculas, cálculo de ínteres y muchas 
cosas más 
MSX ti Manual E 
P.V.P. 2 80 



Este libro contine una colección sin 
igual de trucos y consejos para todos 
los ordenadores con la nueva norma 
MSX No sólo contiene las recetas 
completas, sino también los conoci- 
mientos básicos necesarios 
MSX - Consejos y Traeos. 211 págt 
P.V.P. 2 200. pin. 




MSX 

Programas 
¥ 

Utilidades 




El libro contiene una amplia colección 
oe importantes programas que anar 
can. desde un desensamblador hasta 
un programa de clasificaciones deporti- 
vas Juegos superemocionantes y apli- 
caciones completas Los programas 
muestran además importantes conseios 
y trucos para la programación Estos 
programas funcionan en todos los or- 
denadores MSX. asi como en el SPEC 
TROVIDEO 318 328 
MSX Programa» y Utllldadat . IMS, 

m pág p.v.p 2.200.- ptos. 



El libro del Lenguaie Máquina para el 
MSX esta creado para lodos aquellos a 
quienes el BASIC se les ha quedado 
pequeño en cuanto a rendimiento y 
velocidad Desde las bases para la 
programación en Lenguaie Máquina, 
pasando por el método de trabajo del 
Procesador Z 80 y una exacta desenp- 
cion de sus órdenes, hasta la utilización 
de rubras del sistema todo ello ha sido 
explicado en detalle e ilustrado con 
múltiples ejemplos en este libro 
El libro contiene, además, como pro 
gramas de aplicación, un ensamblador, 
un desensamblador y un monitor 
MSXI 

2.; 




Las computadoras MSX no sólo ofrecen 
una relación precio/rendimiento sobre- 
saliente sino que también poseen unas 
cualidades gráficas y de sonido excep- 
cionales Este libro expone las posibili- 
dades de los MSX de forma completa y 
laol El texto se completa con numero 
sos y útiles programas etemplo 
MSX Gráficos y Sonidos. 250 págs. 
P.V.P. 2.200.- ptas 



El primer libro recomendado para es- 
cuelas de enseñanza de informática y 
para aquellas personas que quieren 
aprender la programación Cubre las 
especificaciones del Ministerio de Edu- 
cación y Ciencia para Estudios de 
Informática Es el primer libro que 
introduce a la lógica del ordenador Es 
un elemento de base que sirve como 
introducción para la programación en 
cualquier otro lenguaje No se requieren 
conocimientos de programación ni si 
quiera de informática Abarca desde los 
métodos de programación clásicos a 
los más modernos 
Metodología da la Programación 
Precio venta 2 200 ptas 



La técnica y programación del Procesa- 
dor Z80 son los temas de este libro Es 
un libro de estudio y de consurta 
imprescindible para todos aquellos que 
poseen un Commodore 128. CPC. MSX 
u otros ordenadores que trabajan con el 
Procesador Z80 y desean programar en 
(enguate máquina 
El PratlHIir Z80 500 páf. P.V.P. 
3 800. pías 



DATA BECKER 
APUESTA FUERTE 
POR MSX 




MUSIC COMPUTER 
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